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PERSONAL COMPUTER 





MET ’N TRAINER 


Een Personal Computer is zo gekocht. 
En goedkoop, als het moet. Héél goedkoop. 
Maar.… dan staat u er verder wel alleen voor. 
Niemand die u ruggesteunt met training, 
installatie, onderhoud en nazorg. Daar 
staat u dan: een Personal Computer rijker 
en… een illusie armer. 


Zo gaat dat gelukkig niet bij Microland. 


Daar koopt u altijd een Personal Computer 
als het ware met een trainer. Want 
Microland helpt u niet alleen graag op weg 
met een doordacht en objectief aankoop- 
advies, maar zorgt ook voor een degelijke 


MICROLAND 


Daar spreken de mensen uw taal. 





training in de dagelijkse praktijk. 
Microland stuurt u niet alleen het veld 
in. Dat is een zekere en veilige gedachte. 
Loop eens vrijblijvend binnen of bel 
voor uitgebreide informatie: 020-12.97.65 
(Amsterdam) of 030-33.25.25 (Utrecht) 


LEASEN 

Al voor zo'n 300,- per maand ex BTW 
kunt u bij Microland een Personal Computer 
leasen. Inclusief training, installatie, 
onderhoud en nazorg. 


Amsterdam: Overtoom | /hoek Stadhouderskade, 
1054 HA Amsterdam. Telefoon: 020-12.97.65. 
Utrecht: St. Jacobsstraat 21, 351 | BL Utrecht. 
Telefoon: 030-33.25.25. 


Ganymedes, de firma met de grootste sortering telescopen van Europa 


Uit voorraad leverbaar: NIEUW !! 

35 modellen telescopen (importeur van Celestron, Polarex, Lenzentelescoop 
Mizar, Vixen), 

39 modellen microscopen (en grote sortering gebruikte 

microscopen), 

35 modellen verrekijkers, gebruikte camera’s. 


Na ontvangst van f 2,50 aan post- 
zegels in brief wordt u een uitge- 
breide fotofolder toegezonden. 
Speciale Celestronfolder f 5,—. 


Ook inkoop — inruil — financie- 
ring. Geopend dagelijks van 
10.00-22.00 uur. 


Wij leveren ook uit voorraad: alles 
op het gebied van oculairen, 
objectieven, spiegels, kleur- en 


î . f 5 D= 90 mm, F = 1000 mm of 
Snelservice: nevelfilters, parallactische monte D= 400 min. € TORO a 


Af ringen, wormwielsets, zoekers, 
vóór 15 uur gebeld valnmikste: materen. stor-atlas- Deze telescoop is voorzien 


uw instrument binnen 24 uur in huis. sen e.d. van een BOOTSEN 


keuze een achromaat of apo- 
chromaat. Tevens is een 
astronomische computer 
voor dit instrument beschik- 
baar. 


Optische instrumenten 


Middeldorpsstraat 3-5, Amstelveen. Tel. 020-41 20 83 of 45 50 32. 
Bank: Rabobank Amstelveen. Rek.nr. 3023.39.175. Giro 4470737. 
Voor België Optiek W. Van Grootven, Kapellestraat 20, 2630 Aartselaar. Tel. 03-887 96 49. 
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€ Personal robot 


Deze personal robot is de missing link tus- 
sen de speelgoedrobot en de zeer dure 
industriële robot. Hij kost rond de 15000 
gulden. De eerste gebruikers laten hem 
chemische laboratoriumproeven doen, 
T-shirts maken of, zoals hier, elektronica- 
prints wegzetten. De robot wordt vervaar- 
digd door het Engelse bedrijf Kenure De- 
velopments Ltd. Hij kan worden bestuurd 
door een goedkope personal computer. 
Men beweert dat het heel eenvoudig isom 
de instructies voor de robot op te stellen. 
WvT. (Foto: London Pictures Service) 








Koeling voor snelle kweekreactor End 


Een kernreactor kan alleen goed in de 
hand worden gehouden, wanneer de 
warmte uit het reactorhart voldoende 
wordt afgevoerd. Dat geldt voor waterge- 
koelde reactoren (als Tsjernobyl), maar 
minstens evenzo voor natriumgekoelde 
snelle kweekreactoren. Wij kennen 
kweekreactoren van het Kalkarproject, 
maar ook in Engeland wordt eraan ge- 
werkt. Deze ring is een model (schaal 1 op 
4) van een koelsysteem voor een kweek- 
reactor. De United kingdom Atomic Ener- 
gy Authority en de National Nuclear Cor- 


poration gaan met dit-model de stroming 
van het koelmiddel onderzoeken. Zo wil 
men computerberekeningen daarover’ 
controleren. De stroming moet mooi re- 
gelmatig zijn en in de constructie mogen 
geen trillingen ontstaan. WvT (Foto: Lon- 
don Pictures Service) 
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Computerbus 


De Noord-Zuid-Hollandse Vervoer Maat- 
schappij NV (NZH) in Haarlem heeft een 
computerbus in gebruik genomen. De bus 
dient om het NZH-personeel te laten ken- 
nismaken met computers. In 1990 zullen 
alle buschauffeurs te maken krijgen met 
computerachtige apparatuur, wanneer de 
strippenkaart wordt vervangen door een 
magneetkaart. 

De NZH verzorgt streek- en stadsbus- 
diensten in een gebied dat reikt van de 
Afsluitdijk tot Den Haag. Er zijn 2000 per- 
soneelsleden, van wie 1500 chauffeurs. 
Zestien mensen tegelijk kunnen met de 
bus in de buurt van hun woonplaats wor- 
den bijgeschoold. Voor ieder duurt de cur- 
sus twaalf avonden. Overdag wil de NZH 
de bus verhuren aan scholen en instellin- 
gen die lessen op computergebied willen 
verzorgen, maar niet over eigen faciliteiten 
daarvoor beschikken. De scholen moeten 
zelf voor een docent zorgen. 

De computerbus is een voormalige 
streekbus die het Centraal Autoherstel 
Bedrijf in Utrecht heeft verbouwd tot ver- 
plaatsbaar leslokaal. Philips installeerde 
negen MSX-computers. De docent kan 
werken met een grootbeeld monitor en 


Geheugen voor tien jaar 


Op de doos van iedere computer staat de 
hoeveelheid RAM (Random Access Me- 
mory) vermeld. Dit geheugen kunnen we 
zelf volschrijven, maar het gaat verloren 
wanneer we de computer uitzetten. Even 
belangrijk is daarom het ROM (Read Only 
Memory). Dit is permanent. De fabrikant 
heeft het ROM eenmalig gevuld. Perma- 
nent geheugen dat we leeg kopen en we 
zelf eenmaal kunnen vullen heet PROM 
(Programmable ROM). Kunnen we het ge- 


De nieuwe kleine geheugenchip van Philips. 
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een overheadprojector. 

Behalve voor magnetisch gecodeerde 
buskaartjes zijn er ook computers op 
komst, die zullen helpen bij het goed uit- 
voeren van de dienstregeling. Deze zullen 


heugen meermalen zelf vullen en wissen, 
dan is de naam EPROM (Erasable PROM). 
EPROM lijkt weer erg veel op RAM. Het 
verschil is dat bij uitzetten van de compu- 
ter de inhoud van EPROM niet verloren 
gaat. Om een EPROM te wissen, moeten 
we meer ondernemen dan dat. 

Er zijn EPROM-chips met een raampje. 
Bestralen we dat met ultraviolet licht, dan 
verdwijnt de oude inhoud. Een nieuwe in- 
houd kan langs elektrische weg worden 
toegevoerd. Bij andere EPROMSs gaat ook 
het wissen langs elektrische weg. De 


echter niet rechtstreeks door de chauf- 
feurs worden gebruikt, maar door de 
dienstleiders op de busstations. (W.v.T.) 


Het interieur van de NZH-computerbus. Foto 
NZH 





naam is dan EEPROM. Philips heeft on- 
langs een nieuwe EEPROM-chip geïntro- 
duceerd, de PCF 8582. Eén chip bevat 
een kwart kilobyte. De opgeslagen gege- 
vens worden tien jaar lang vastgehouden. 
Desgewenst kan de inhoud van de chip tot 
10.000 maal toe veranderd worden. Ge- 
woonlijk gaat het wissen van een EE- 
PROM met de vrij hoge spanning van 21 
Volt. Bij de PCF 8582 is de gewone 5 Volt 
al voldoende. 

De PCF 8582 is niet bedoeld voor gebruik 
in gewone mikrocomputers. In die com- 
puters lopen de bits steeds met 8, 16 of 32 
tegelijk door evenzovele draden. De dra- 
den samen heten de databus. De PCF 
8582 is bedoeld voor een eenvoudiger sy- 
steem. In die zogeheten |?C-bus komen 
de bits na elkaar binnen, niet tegelijk. Er 
zijn minder verbindingen nodig en dat 
maakt de montage eenvoudiger. 1°C staat 
voor Inter-IC (chips onder elkaar”’) en is 
een eigen ontwikkeling van Philips. De 
PCF 8582 heeft slechts acht aansluitin- 
gen, veel minder dan een geheugenchip 
voor een gewone databus. 

De PCF 8582 kan worden toegepast in alle 
schakelingen die volgens de regels van 
[°C zijn opgezet. Die schakelingen kunnen 
van alles zijn, maar er valt te denken aan 
regelingen voor automotoren of gepro- 
grammeerde _wasmachinebesturingen. 
Ook portofoons en radio- of tv-ontvan- 
gers kunnen via dergelijke geheugenchips 
hun voorkeurskanalen onthouden. 
Nadere informatie: Philips Nederland, 
Marktgroep Elonco, Eindhoven, telefoon 
040-785809. (W.v.T.) 


Ex 


NATUUR 


IJsbloemen op de ramen zijn vaak bewonderendswaardig 
mooi van vorm en structuur. Hoe ze ontstaan is in grote lijn 
voorspelbaar. In detail echter gedraagt hun structuur zich 
“chaotisch”. Zo’n gedrag kunnen we met de computer 
nabootsen. 


IJSBLOEMEN 


uit de computer 


In A&K/DJO 4/1985 hebben we 





ding ”c sin z” herhaald toepassen en op hetzelfde artikel in A&K/DJO 


op pagina 260 tot 263 aandacht be- 
steed aan onderzoek naar ’chao- 
tisch” gedrag van wiskundige funk- 
ties. Dat gedrag kan met de grafische 
mogelijkheden van komputers fraai 
zichtbaar gemaakt worden, zoals uit 
de plaatjes bij dat artikel ook te zien 


de punten in het vlak verschillende 
kleuren geven, naar gelang ze meer of 
minder snel weglopen. Bij ons zijn er 
twee kleuren”: sterretje voor de 
meer honkvaste punten en punt voor 
de vluchtige punten. In tegenstelling 
tot het fractalsprogramma dat we in 


4/1985 voortbouwde, zet dit pro- 
gramma het resultaat meteen op een 
bepaalde plaats op het scherm, niet 
eerst in een DIM: het is hier voor het 
verdere verloop van het programma 
niet nodig oude uitkomsten te bewa- 
ren. De hoofdeigenschap van het 


was. Eén van de toen bekeken funk- 
ties had de gedaante "’c sin z"’. Bij ver 
doorrekenen van een dergelijke funk- 
tie blijkt dat bepaalde punten van de 
funktie min of meer op hun plaats blij- 


het vorige nummer brachten en dat 


hele wiskundige experiment is, dat 


ven en dat andere snel van hun oor- |: unten EERE nn 
spronkelijke positie weglopen. REERINK Ben dp en emee ken nn ee ze bea aad *x 
KN LENEN KRUKKEN, „ee HTI za nee eee HEN hk 
Het komputerprogramma dat 
bns nn BEER ene VINK KENK ENKA, Nen WEE ver ee ekeren bekeken 
we hierbij geven, doet zo’n wiskundig 0 HMF UR REN Ur PE BRAAD 6 Ib 5 il ee Sar HHN HH NH HH 
experiment na: we gaan de afbeel- |! ---- betaat a EEE Ae ei hhnthehadedeh shel VEREEN keke 
Eeen KUURNE In an BEN dE oe RR on eer 
ewa ne Konvvnn deinde Een aan en ENEN RAN, URE oe en EN 


Een stukje ijsbloempatroon. De sterretjes zijn 
min of meer honkvaste punten, de stippen zijn 
punten die snel van hun oorspronkelijke positie 
weglopen. Illustratie W. van Tend Lee 


10 REM 

20 REM B karakteriseert de verdraaiingsspiraal "'c'' 

30 REM Bij B=0 geen verdraaiing, maximale waarde 0.8. 

40 REM 

50 B=8 

60 REM 

70 REM ML is het aantal malen dat de afbeelding herhaald wordt. 
80 REM 

90 ML=6 

100 REM 

110 REM GROOT is de afstand in het kwadraat, waar we het herhalen van de 


120 REM afbeelding zullen afbreken, omdat we te ver van de oorsprong wegraken. 


130 REM 
140 GROOT =99 
150 REM 
160 REM XSR is het nummer van de meest Rechtse positie op het beeldScherm. 
170 REM 
180 XSR=80 
190 REM 
200 REM YSO is het nummer van de Onderste regel op het beeldScherm. 
210 REM 
220 YSO=20 
230 REM 
240 REM XL is de X-koördinaat van de Linkerbegrenzing van het deel van het 
250 REM vlak, dat we willen bekijken, XR van de Rechterbegrenzing. 
260 REM 
270 XL=-2:XR=2 
280 REM 
290 REM YB is de Y-koördinaat van de Bovenbegrenzing van het deel van het 
300 REM vlak, dat we willen bekijken, YO van de Onderbegrenzing. 
310 REM 
320 YB=2.5:YO=0 
330 REM 
340 REM Maak het scherm schoon. 
350 REM 
360 CLS 
370 REM 
380 REM De volgende vier programmaregels leggen de ige ‘sin z”’ vast. 
390 REM 
400 DEF FNSINHOX) =(EXP(X)-EXP(-X9)/2 
410 DEF FNCOSH(X) =(EXP(X) + EXP(-X))/2 
420 DEF FNREDE(X,Y)=SINX)"FNCOSH(Y) 
430 DEF FNIMDE(X,Y)=COS() "FNSINH(Y) 
440 REM 
450 REM Y1 telt het regelnummer, X1 het positiënummer in de regel. 
460 REM 
470. FOR Yi=1 TO YSO STEP 1 
480 FOR X1=1 TO XSR STEP 1 
490 REM … 
500 REM Doe de koördinaten van het huidige punt in het vlak in 
510 REM het werkpunt X,Y. 
520 REM 


nnn nannennunnn une 


…...enanne nn ene eee uu se ee 
nnen een nna nen u enne ue ne 
ann nanne nnen ennen 
eenn nnn nnn nnn nn 


530 Y=YB-(Y1-1)"(YB-YOU(YSO-1) 

540 X=XL+(X1-1)"XR-XL/(XSR-1) 

550 REM 

560 REM Ga nu de afbeelding een aantal malen herhalen. 

570 REM 

580 FOR l=1 TO ML 

590 REM 

600 REM Eerst de afbeelding "sin z”’. 

610 REM 

620 FX1=FNREDE(, Y):FY1 =FNIMDE(X,Y) 

630 REM 

640 REM Nu de verplaatsing over de spiraal (”’c'’). 

650 REM 

660 FX=FX1-B'FY1:FY=FY1+B*FX1 

670 REM 

680 REM Het punt waar we zijn uitgekomen, wordt het nieuwe werkpunt. 
690 REM 

700 X=FX:Y=FY 

710 REM 

720 REM Als we ver weg zijn geraakt van de oorsprong, markeren we het 
730 REM huidige punt als zodanig en stoppen we met het herhalen van de 
740 REM afbeelding. Deze ontsnapping is ook al nodig om ervoor te zorgen 
745 REM dat we geen grotere getallen krijgen, dan de komputer aankan. 
750 REM 

760 IF X°X+Y*Y=GROOT THEN TEKEN$=".":GOTO 900 

770 REM 

780 REM Volgende punt. 

790 REM 

800 NEXT | 

810 REM 

820 REM Als we hier langs komen, liep ons punt maar langzaam van 

830 REM de oorsprong weg. We doen de mate markering in TEKENS. 
840 REM 

850 TEKENS$=""" 

860 REM 

870 REM Zet de cursor op regel Y1 en positie X1 en zet de 

880 REM markering die het punt heeft gekregen, op het scherm. 

890 REM 

900 LOCATE Y1,X1 : PRINT TEKENS 

910 REM 

920 REM Een punt naar rechts. 

930REM 

940 NEXT X1 

950 REM 

960 REM Een regel naar beneden. 

970 REM 

980 NEXT Y1 

990 REM 

1000 REM Klaar. 


__ 1010 REM 


1020 END 
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zap ties IJsbloemen in de werkelijkheid. Foto Johan 
EE Smekens 


G.J. v. Lonkhuyzen 
Siso code 644.9 


Molen 
met 
12 wieken 


Een molen die draait, veroorzaakt een vi- 
bratie. Bij een windturbine, die als regel 
niet op een zwaar molengebouw is ge- 
monteerd, werken die vibraties nadrukke- 
lijk door in de mast. Een groot probleem is 
dat als regel niet. Maar het wordt anders 
als men veel molens op één mast gaat 
zetten. Dan gaan àl die turbines vibraties 
maken en doorgeven aan de overige con- 
structie. Dat is wel een probleem, want de 
vibraties zijn niet allemaal gelijk. Dat komt 
door. de wind. Er bestaat een windgra- 
diënt: een variatie in de snelheid van de 
wind, afhankelijk van de hoogte boven de 
grond. Dat is ook wel logisch. De wind die 
langs de grond strijkt ondergaat daarvan 
de remmende werking en zal dus een ge- 
ringere snelheid hebben dan wind die op 
enige hoogte door niets wordt tegenge- 
houden. 

Bij een multimolen staan de turbines twee 
aan twee op een “verdieping”. De Lager- 
wey op de Maasvlakte die zes turbines 
heeft, kent dus drie verschillende niveau's 
en daarmee dus ook turbines die op drie 
verschillende snelheden draaien. Hoe 
moet je nu zo sterk verschillende vibraties 
verantwoord door de toren laten opne- 
men? 

Lagerwey heeft die vraag beantwoord met 
elasticiteit. Hij koos voor de torencon- 
structie materiaal dat voldoende elastici- 
teit heeft om op elke etage de daar be- 
staande vibratie op te vangen. Technisch 
uitgedrukt: de constructie is die van slap- 
pe buismast, waarvan de laagste eigen- 
frequenties onder de excitatiefrequenties 
van de turbines blijven. Jaren geleden 
werd wel eens vermoed dat een multimo- 
len pas mogelijk werd als men ervoor kon 
zorgen, dat alle turbines op dezelfde snel- 
heiddraaien en dus de hogere molens 
door middel van bladverstelling dezelfde 
snelheid houden als de laagste: een zeer 
ingewikkelde aanpak. 

Bij de Lagerwey houden de turbines dus 
hun “eigen” snelheid en bijgevolg leveren 
de diverse etages ook verschillende hoe- 
veelheden energie. Voor de multimolen op 
de Maasvlakte is berekend, dat de laagste 
etage (waarvan de ashoogte op 19 meter 
boven het maaiveld ligt) de jaaropbrengst 
200.000 kWh zal hebben. Op de tweede 
etage (36 meter hoog) zal de opbrengst 
280.000 kWh zijn en op de hoogste etage 
(53 meter) wordt 320.000 kWh ge- 
produceerd. 


ENERGIE/Wind- 


Er is heel lang over gepraat door diverse ingenieurs, maar 
steeds hikte men tegen technische problemen aan waarvoor 
zich maar geen oplossing aandiende. Maar sinds januari 
draait op de Maasvlakte een echte multimolen: zes 
afzonderlijke windturbines op één mast. De bouwer ervan is 
Lagerwey: een van de oudste windturbinebouwers van ons 








De multimolen van Lagerwey; zes windturbines 
met een doorsnee van 7,5 meter elk. Samen 
goed voor 800.000 kWh. 


Klein is haalbaar 


Terwijl Lagerwey met zijn multimolen aan 
de gang ging, werd in Amerika besloten 
drie gigantische windmolens in de staat 
Washington (Noordwest-VS) aan de Co- 
lumbia rivier te slopen. Men is tot de slot- 
som gekomen dat de turbines niet aan de 
verwachtingen hebben voldaan wegens 


land. 


MANTELBUIS 





Doorsnee van de krui-inrichting van de multi- 
molen. Die inrichting zit in de voet van de toren; 
dat is onderhoudstechnisch het gemakkelijkst. 


een veelheid van technische mankemen- 
ten. De wieken van die reuze molens had- 
den een doorsnee van ongeveer 45 meter 
en wogen ruim negentig ton. Toch is men 
niet ontevreden over de drie turbines, pro- 
dukten van Boeing, want ze hebben wel 
véél energie geleverd. Naar schatting 
werd er voldoende elektriciteit geprodu- 
ceerd om 2.000 woningen van energie te 
voorzien: 7,5 Megawatt. Het probleem zat 
dus niet in een te geringe opbrengst, maar 
in de te hoge onderhoudskosten. De 
stroomkosten werden daardoor niet 2 tot 
4 dollarcent per kWh, maar 10 tot 12 dol- 
larcent. Ook in Amerika wordt nu veel 
meer verwacht van kleinere turbines. In 
Californië alleen staan er 13.000. 

Maar kleine turbines brengen minder op 
en heeft men veel energie nodig, dan 
moeten er dus veel kleine turbines komen 
en dat kost veel, zeer veel ruimte. In ons 
land is dat een onmogelijke zaak. Daarom 
bouwde Lagerwey zijn multimolen. Daar- 
mee heb je zes molens op de plaatsruimte 
van één. 
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[eve ONDERWIJS 


INTRODUCTIE 


IN DE 
COMPUTER 


Deel 2 


Er is echter een ander hulpmiddel dat 
mensen al jarenlang gebruiken voor het 
ondersteunen van hun denkpatroon: en 
dat is papier. Papier wordt gehanteerd 
wanneer men het overzicht wil behou- 
den van vele kleine details of van ge- 
compliceerde, onoverzichtelijke zaken. 
We kunnen daarom op twee manieren 
automatiseren: 

WD door de papierstroom (die immers 
een weerspiegeling behoort te zijn van 
het denkproces) te volgen - in dit geval 
krijgen we elektronisch papier; 

@) door de papierstroom over te slaan 
en terug te gaan tot de achterliggende 
gedachten en deze laatste in één keer in 
de computer in te brengen. Er zijn meer- 
dere manieren, bijvoorbeeld: 

® afwijking van het bovenstaande 
vanwege de kostenfactor, of 

4) omdat papierstroom of denkpa- 
troon onjuist gebleken zijn. 


Zowel voor automatisering in het onder- 
wijs als in het bedrijfsleven is het in elk 
geval van belang te weten hoe ons 
denkpatroon precies verloopt. ledereen 
die bij zijn eigen verstand of dat van een 
ander te rade gaat, zal enige wetmatig- 
heden kunnen ontdekken. 





Groepen 


Een van de belangrijkste wetmatighe- 
den is dat we schijnen te denken in 
groepen of mentale hokjes. Alles wat we 
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voor acties en handelingen.) 


omgekeerd: 


In de vorige aflevering van “Introductie in de computer” 
hebben we gezien hoe de computer een mee-rekenaar of 
mee-denker is voor degene die de computer inbezit heeft (de 
gebruiker). De computer is een elektronisch denkraam dat het 


tegenkomen moet in een hokje kunnen 
worden geplaatst of wordt anders men- 
taal verworpen (als het niet bij een hokje 
hoort). 

Dit principe wordt in de reclame ge- 
bruikt om produkten een dergelijk ui- 
terlijk te geven dat de consument denkt 
dat het produkt in een bekend en ver- 
trouwd mentaal hokje thuishoort. Zodat 
hij het produkt niet verwerpt, maar ac- 
cepteert. 

Ook de ondernemer denkt op deze wij- 
ze. Op ontvangst van een inkomende 
stapel post zal hij deze splitsen in klei- 


Afbeelding 2: inkomende post wordt opge- 
splitst in stapels. _ 





nere stapeltjes: een stapeltje met finan- 
ciële papieren, een stapel reclamewerk, 
een stapel die hij wil bewaren, een waar- 
over hij nog even na moet denken, en 
één die meteen weg kan. (Deze laatste 
reclame heeft zich niet gepresenteerd 
als horende in een bepaalde of het juis- 
te, mentale hokje.) | 
Uiteindelijk ligt het bureau dan vol met 
enkele stapels papieren; we bezien nu 
wat er met de stapels gebeurt: in som- 
mige gevallen laat de man achter het 
bureau zich leiden door de grootte van 
de stapels: de grootste stapel wordt als 
het meest urgent gezien. 

(Dit is natuurlijk niet altijd juist, omdat 
het kleinste stapeltje een dringende 
aanmaning kan bevatten.) 

De grootste of andere meest urgente 
stap kan nu op zijn beurt worden opge- 


__ splitst in urgente zaken en worden ge- 


sorteerd in volgorde van belangrijkheid. 
(Wat geldt voor stapels, kan ook gelden 


Onderwijs 


Voor het onderwijs is het proces geheel 
niet van globale naar 


denkpatroon van de gebruiker behoort te volgen. 






steeds kleinere bijzonderheden, maar 
juist andersom. Beginnende met een 
detail dat de leerling zich eigen kan ma- 
ken en nog een detail en nog een detail, 
verkrijgt hij uiteindelijk het benodigde 
overzicht. Hetzelfde geldt voor basis- 
principes of regels. De details die de 
leerling worden bijgebracht, behoren 
alle van belang te zijn voor het verkrijgen 
van dat overzicht. 


Computer 


De rol van de computer in dit alles is 
ondersteunend, met name wanneer 
sprake is van vele onoverzichtelijke de- 
tails. Let op dat de computer zijn werk 
niet weer teruggeeft aan zijn gebruiker. 
Zo kan de mens zelf een informatie- 
stroom verwerken die uit verschillende 
stukken bestaat. Een computer verlangt 
veelal dat hapklare brokken informatie 
worden aangeboden van dezelfde 


Afbeelding 3:een computer verlangt veelal (ten 
onrechte) dat hapklare brokken informatie wor- 
den aangeboden van (alleen) dezelfde soort. 
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soort: dus uitgaande nota’s bij uitgaan- 
de nota's, adressen bij adressen en- 
zovoorts. Dit is nog een gebrek, evenals 
het opslaan in computerfiles van alleen 
één soort informatie bij elkaar. 

In de wereld van het papier komt dit ook 
wel voor, maar er kan van af worden 
geweken. We zagen al dat de post op 
een grote stapel kan liggen, met alle 
documenten door elkaar. Ook in een 
dossier kunnen verschillende soorten 
documenten, brieven, formulieren en 
pagina’s achter elkaar zitten. Toegege- 
ven, dat is onoverzichtelijk, maar we ge- 
bruiken juist de computer om het over- 
zicht terug te krijgen. Niet om van de 
computer meer werk te krijgen, doordat 
hij aan ons eisen gaat stellen. 














Uitsplitsen 


De computer zal ons moeten helpen om 
een stroom informatie uit te splitsen 
naar de verschillende bestanddelen. 
Bijvoorbeeld nota’s bij nota's, adressen 
bij adressen, enz. Tot aan het moment 
dat de computer hiervoor voldoende in- 
telligentie heeft, moeten we nog helpen. 
Dit doen we door op het document het 
soort van document nog even in te vul- 
len, zoals factuur, NAW (van naam, 
adres en woonplaats), e.d. De computer 
“weet” nu waar hij aan toe is, en kan de 
informatie uitsplitsen. 


Bewerking 


Verdeeld werk (in stapels) wordt in een 
bedrijf volgens bepaalde regels ver- 
werkt. Let op dat deze regels vaak op 
papier staan (horen te staan). 


Afbeelding 4: werk wordt in een bedrijf volgens 
bepaalde regels verwerkt. 


Ed 


Inkomend papier wordt dan bewerkt 
aan de hand van papier waarop de be- 
werkingsregels staan. Ja, zult u zeggen, 
maar niet alles bestaat uit papier; hoe zit 
het met bezoekers, handelingen, tele- 
foontjes en dergelijke’? 

Al deze zaken zijn met de menselijke 
taal op papier te zetten. De bewerkin- 
gen ervoor (wat er gebeuren moet) zijn 
met op papier te zetten regels te bepa- 
len. (En wat niet op papier te zetten is, 
valt ook niet te programmeren.) Het re- 
sultaat kan door middel van de taal weer 
worden omgezet in actie, bezoek, tele- 
foontjes, enzovoorts. 


Afbeelding 5: inkomend papier wordt bewerkt 
aan de hand van bewerkingsregels. 


KIGLL | 
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Computerpagina’s 


Computerpagina’s bestaan niet uit pa- 
pier maar de elektronische tegenhanger 
ervan. Deze kunt u zich voorstellen als 


VIATIE 


een stuk ruitjespapier. In elk ruitje staat - 


een cijfer, dat een letter voorstelt (65 =a, 
66=b, enz). De cijfers “zitten” in de 
computer. door verschuivingen van 
elektronische “kraaltjes” in de vele 


elektronische “telramen”’ waaruit het 
computergeheugen bestaat. Bewerkin- 
gen als optellen, vermenigvuldigen en 
sorteren van letters, gebeuren door 
elektronische schakelingen in de ”telra- 
men’. Zo’n tabel van getallen is het 
equivalent van “papier” en kan door de 
computer verder worden verwerkt (het 
heet een matrix). 


Afbeelding 6: computerpapier bestaat uit elek- 
tronische “ruitjes”. 





Bewerkingen overzicht 


Een overzicht van de principes van 
computerbewerking is vrij gemakkelijk 
te geven: 

inkomende tabellen worden uitgesplitst 
naar soort, vervolgens wordt bezien 
welke soort het meest urgent is. Binnen 
deze soort wordt opnieuw gesplitst of 
gesorteerd, en ten slotte wordt een be- 
werkingsvolgorde verkregen. Aan de 
hand van een andere tabel worden de te 
bewerken tabellen veranderd. Dit ge- 
beurt voor alle soorten van ingekomen 
“elektronische pagina’s”, en alle resul- 
taten worden weer samengevoegd tot 
een uitgaande serie van pagina’s. Deze 
serie wordt verzonden en elders weer 
uitgesplitst enz. 

Voorbeeld: inkomende nota's worden 
uit de (elektronische) post gehaald, ge- 
sorteerd op datum volgorde, betaald op 
datum volgorde (behalve de vaste las- 
ten zoals huur) en de betalingsopdrach- 
ten worden tussen de overige post ge- 
voegd en verzonden. | 
Dit patroon geldt ook voor andere zaken 
dan financiële kostenposten. 


Opleiding 


Een opleiding moet dit hele proces be- 
waken en bezien waar de leerling een 


„fout gemaakt heeft. Dit aan de hand van 


de feedback: is de uitgaande stroom, 
een passend antwoord op de inkomen- 


de stroom. Onderwijssoftware is dus: 


pas te bouwen als de hele voorgaande 
cyclus met goed gevolg gebouwd is. 


Het automatiseren van één werk- 
plek 


Het automatiseren van één persoon of 
werkplek (eigenaar van een klein bedrijf 
of een werknemer in een groot bedrijf) 
gaat dan als volgt: 

breng in kaart alles wat op deze per- 
soon afkomt. Als het niet op papier 
staat, zet het dan op papier. Zet alle 


bewerkingen op papier. Zet alle resulta- 
ten op papier en waar dat resultaat naar 
toe gaat. 

Zoals in het voorgaande besproken, 
hebben bewerkingen en inkomende 
zaken prioriteiten die volgens bepaalde 
regels bepaald worden. 


Afbeelding 7: automatisering begint met in 
kaart brengen wat allemaal op iemand afkomt, 


en wat er mee gebeuren moet. 





Verschillende werkplekken 


Het automatiseren van verschillende 
werkplekken wordt ingewikkelder. We 
moeten het proces herhalen voor elke 
werkplek. Als een werkplek overbezet 
is, verleggen de werkstromen vaak hun 
route, of er ontstaat een bottleneck (die 
we in de automatisering niet willen). Al- 
vorens te gaan automatiseren willen we 
eerst die bottlenecks eruit hebben. 


Afbeelding 8: het automatiseren van verschil- 
lende werkplekken. 





Onderwijs in complexe zaken 


Was het bouwen van een onderwijssys- 
teem al een probleem, een echt pro- 
bleem wordt het maken van software tot 
lering van het bovenstaande. De cursist 
moet namelijk worden geleerd naar ge- 
lang de situatie een andere methode 
van oplossen te kiezen, en afhankelijk 
van de situatie steeds een ander pro- 
bleem op te lossen. (Hoewel in de prak- 
tijk de enige test vaak is dàt een pro- 
bleem wordt opgelost en niet hóe dat 
gebeurt.) | 
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Eerste en noodzakelijke begin 


Het eerste en noodzakelijke begin voor 
succes van de computer in het onder- 
wijs is echter heel wat eenvoudiger: be- 
gin gewoon ergens. Ga naar een com- 
putershop en probeer eens wat. Neem 
een computer, het hindert niet (echt) 
welk merk. Hij bijt niet, u wordt geen 
“freak” als u dat al niet was, er over- 
komt u niets dat niet omkeerbaar is. Het 
beste is vervolgens: persoonlijke erva- 
ring - zelf programma’s bedienen, zelf 
programmeren, programma’s trachten 
te koppelen. Het is niet mogelijk zich 
verdere theorie eigen te maken zonder 
deze “hands-on” ervaring (in goed Ne- 
derland: de handen uit de mouwen”). 
Verdere computertheorie zal voor u 
slechts even begrijpelijk zijn, als u de 
handen uit de mouwen gestoken heeft. 


Afbeelding 9: de allereerste stap is kennisma- 
king. 





Volgende keer: 


INTRODUCTIE deel 3: INTRODUCTIE 
IN ROBOTS 


m 
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Return 
Info 


Hebt u vragen? 

Suggesties”? 

Ideeën? 

Aarzel niet, maar stuur ze naar de 
redactie van 

A&K-INFORMATICA 

Postbus 108 - 1270 AK Huizen 


MEETBARE: DU TTE Mae ED 
Rien van Dongen 


Vergissing in vorige 
RETURN-INFO 


Per vergissing is in de vorige uitgave 
van deze rubriek het besteladres van 
BASICODE-2 niet opgenomen. Wel 
stond het adres van BASICODE-3 ver- 
meld. Bezitters van deze nieuwe BASI- 
CODE kunnen BASICODE-2 program- 
ma's gewoon laden en gebruiken. 
BASICODE-3 is er echter nog niet voor 
alle computers. Sommige computers 
houden bij gebruik van BASICODE-3 
wat minder geheugenruimte over. Daar- 
door passen de langere programma’s 
van NOS-Hobbyscoop niet in het ge- 
heugen van de computer. Bij de TROS 
houdt men natuurlijk rekening met de 
grootte van het geheugen bij BASICO- 
DE-3. BASICODE-2 (boek en cassette 
kost f 27,50) is verkrijgbaar bij: 
NOS-radio, Hobbyscoop, 

Postbus 1200, 1200 BE Hilversum 


(Vermeld bij uw bestelling welke com- 
puter u bezit, misschien is het vertaal- 
programma voor uw computer onlangs 
uitgezonden en staat het nog niet op de 
cassettel) 


Hoofdletters en kleine 
letters 


De ene computer geeft net als een type- 
machine kleine letters als de SHIFT- of 
wisseltoest niet ingedrukt is maar de 
andere juist hoofdletters. Bij program- 
ma’s die uitwisselbaar moeten zijn tus- 
sen diverse computers is het goed 
daarop bedacht te zijn. 

Als we in een programma invoer van het 
toetsenbord vragen (bijvoorbeeld met 
INPUT) moeten we er rekening mee 


houden dat er zowel hoofd- als kleine 


letters binnen kunnen komen. Test 
daarom op woorden in beide lettersoor- 
ten. Bijvoorbeeld: 

IF (A$="JA”) OR (A$="ja””) THEN … 





Kent BASICODE alleen maar 
HOOFDletters? 


BASICODE kent wel degelijk hoofd- en 
kleine letters. Maar deze vraag van me- 
vrouw Alberts horen we wel vaker. Omdat 
ook zij een Commodore-64 heeft vermoe- 
den we dat het hier om het bekende pro- 
bleem gaat. 


De Commodore-64 heeft namelijk twee 


standen, een voor alleen hoofdletters plus 
veel grafische karakters en een voor 
hoofd- en kleine letters samen met weinig 
grafische karakters. Alléén als de compu- 
ter tijdens het laden van een BASICODE-2 
programma, in de tweede stand staat, ko- 
men er hoofd- en kleine letters in het pro- 
gramma (als die er al in stonden). Helaas is 
dit niet de stand waarin deze computer 
start. Dus vóór het laden eerst altijd even 
omschakelen (SHIFT plus Commodore- 
toets) naar kleine letters. 


Optimod of minimod? 


Optimod dient ervoor om de geluids- 
kwaliteit van de radio op de middengolf 
te verbeteren en tegelijkertijd de energie 
die de zender nodig heeft te beperken. 
Deze electronische truc (‘optimale mo- 
dulatie’) vervormt de signalen echter 
zodanig dat computerprogramma’s niet 
goed overkomen. Althans, bij NOS- 
Hobbyscoop had men de ervaring dat 
voor computerprogramma’s optimod 
uitgeschakeld moest worden. De TROS 
heeft geprobeerd aan te tonen dat com- 
puterprogramma’s ook mèt optimod 
uitgezonden kunnen worden. Precies 
hetzelfde programma werd eenmaal 
uitgezonden met en eenmaal zonder 
optimod. We hebben het eerste pro- 
gramma niet kunnen laden. Schrijft u uw 
ervaringen eens naar ons? Is optimod 
nu wel of niet een minimod? 


Software verbetert 
hardware 


Steeds weer staan we verbaasd over de 
mogelijkheden van goedkope appara- 
ten in combinatie met goede software. 
Voor de Commodore-64 is er nu een 
hulpprogramma waarmee deze een ge- 
wone Epson-compatible printer netjes 
laat schrijven. Bovendien kunnen we 
zelf letters ontwerpen met het bijgele- 
verde ontwerpprogramma. Elders in dit 
nummer leest u er meer over. 


Automatisch opnemen 


Voor het opnemen van computerpro- 
gramma's van de radio op cassette 
kunnen we een eenvoudige schakelklok 
gebruiken. Die goedkope schakelklok- 
ken zijn echter niet erg nauwkeurig. Stel 
daarom de inschakeltijd vijf of tien mi- 
nuten te vroeg af en gebruik C-90 cas- 


- Sen 


Rien van Dongen 


Niet alleen 
vragen, 
ook 











antwoorden! 


Foutjes in programma's 

Het is, heer Knops, inderdaad onjuist om 
in BASICODE-programma's achter een 
getal (pi=…) een hekje te zetten (A&K 1 
blz. 43, 57, 75, 82). Ook juist is dat BASI- 
CODE-regels niet langer dan 60 tekens 
mogen zijn, inclusief alle spaties en het 
regelnummer. 


Wat is MS-DOS? 


We proberen in A&K Informatica onnodig 
vakjargon en onduidelijke afkortingen te 
vermijden. Dat lukt niet altijd. Gelukkig 
wees Peter Taanman ons erop dat de term 
MS-DOS niet voor iedereen betekenis 
heeft. 

MS-DOS betekent: Micro-Soft Disk 
Operating System. Het is een computer- 
programma dat de schakel vormt tussen 
de computer en een gebruikersprogram- 
ma. Dit programma zorgt er onder andere 
voor dat de invoer van en de uitvoer naar 
het toetsenbord, het beeldscherm, het 
geheugen, de diskettes en de printer op 
een gestandaardiseerde wijze gebeuren. 
Daardoor kan bijvoorbeeld een tekstver- 
werker die voor MS-DOS is geschreven, 
op diverse computers werken, mits die 
verschillende computers met het ‘tussen- 
programma’ MS-DOS kunnen omgaan. 


BASICODE kan ook op MS-DOS en CP/M com- 
puters werken! 

Van diverse lezers, onder andere H.J. van 
Osenbruggen, W. Cremers en Patrick 


e 


settes. Op deze manier hoeft u geen 
programma te missen. 


Nog meer electronische 
trucs 


Van Oge Kruijt uit Houten ontvingen we 
een programma over electronische fil- 
ters. Elders in dit nummer vindt u een 
beschrijving van deze inzending en een 
uitbreiding daarop. We zijn erg blij met 





INFORMATIE 


Zeer verheugend was het grote aantal reacties op het eerste 
nummer van A&K Informatica. Vooral de suggesties voor artikelen 
en computerprogramma’s kunnen we goed gebruiken. Onder 
andere van M.A. Verzandvoort en H.C. de Kruik kregen we een 
spontaan aanbod om regelmatig mee te werken aan dit blad. 
Verder vele vragen, waarvan we in dit nummer maar een gedeelte 
kunnen beantwoorden. Maar ook opmerkingen of antwoorden op 
vragen van andere lezers zien we graag tegemoet. Zo stuurde de 
heer P. Knops ons naast een aantal nuttige voorstellen, waar we in 
de volgende nummers op in gaan, enkele tekstcorrecties op, zoals 
de volgende foutjes. 


Bervoets kregen we vragen over BASICO- 
DE op PC's met MS-DOS of CP/M. 
CP/M is net zo’n programma als MS-DOS 
(zie hierboven). Programma's die voor 
CP/M geschreven zijn kunnen op allerlei 
’CP/M'-computers werken. Om met BA- 
SICODE te werken is een cassette-recor- 
der nodig. De meeste CP/M computers 
hebben echter geen cassette aansluiting. 
Het zelfde geldt voor MS-DOS compu- 
ters. Toch is het mogelijk op deze appara- 
ten een cassetterecorder aan te sluiten. 
Daarvoor wordt gebruik gemaakt van de 
printeraansluiting. De benodigde tussen- 
schakeling is zeer eenvoudig door een 
hobbyist te maken. Slechts een paar on- 
derdelen zijn daarvoor nodig. De bezitters 
van een MS-DOS computer vinden het 
schema op de BASICODE-diskette en 
voor de CP/M computers staat de be- 
schrijving in het NOS-Hobbyscoop BASI- 
CODE-2 boek. Bestelling en inlichtingen: 
zie adres en artikel van NOS-Hobbyscoop 
elders in dit nummer. 


Wat zijn toch die BASICODE-routines? 


Dat was wel te verwachten, dat we veel 
vragen zouden krijgen over de BASICODE 
routines. Voor de afgedrukte BASICODE- 
programma’s hoort een rijtje routines. De 
gebruikers van BASICODE weten dat wel. 


Die routines worden namelijk automatisch _ 


voor een programma gezet, dat van de 
radio geladen wordt. Het BASICODE-ver- 
taalprogramma zorgt daarvoor. Die routi- 


zulke inzendingen. Ook niet uitgewerkte 
ideeën zien we graag binnenstromen …. 


m 





nes staan al klaar zodra het vertaalpro- 
gramma in gebruik wordt genomen. 
Daardoor kunnen bezitters van BASICO- 
DE hierna onmiddellijk onze programma's 
intypen en gebruiken. 


Hoe goed sproeit de tuinsproeier? 


Het programma voor de tuinsproeier is 
gebaseerd op afzonderlijke druppels. 
Omdat de tuinsproeier straaltjes spuit die 
pas later overgaan in druppels, is het uit- 
stroompatroon niet geheel correct. Mis- 
schien kan O.G. Kruyt zelf eens proberen 
een beter model te ontwikkelen. Of kan 
een andere lezer helpen? 


Welke computer moet u kopen? 


We zijn niet van plan op zulke vragen te 
antwoorden. Het is heel moeilijk adviezen 
te geven over hardware (computer appa- 
raten). Het hangt er helemaal van af wat u 
met uw computer gaat doen. In het alge- 
meen is het verstandig om een computer 
te kopen, waarvoor veel software (het 
aanbod aan programma’s) te koop is. 
Maar het is best mogelijk dat u, bijvoor- 
beeld voor de beveiliging van uw huis, 
beter uit bent met een heel speciale com- 
puter waarvoor alle software door u zelf 
gemaakt moet worden. Verwacht van ons 
dus geen adviezen over de aankoop van 
computers. Bovendien zijn er tijdschriften 
genoeg, en zelfs hele boeken, die vol 
staan met testen en beschrijvingen van 
apparatuur. 
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Prijzenregen voor actieve luisteraars van NOS-radio programma HOBBYSCOOP 


Op 1 maart sluit de programmeerwed- 
strijd van Hobbyscoop definitief. Het po- 
pulaire NOS-radioprogramma, dat nu 
tweemaal per week, wordt uitgezonden, 
kreeg van luisteraars en van briefschrij- 
vers te horen dat men graag nog wat meer 
tijd kreeg om de inzendingen voor te be- 
reiden. In de tussentijd zendt men alvast 
de ontvangen programmatuur uit, wat 
zoals bekend, een verschrikkelijk cirkel- 
zaag-geluid op de radio veroorzaakt. 

Na 1 maart zal een jury bestaande uit twee 
leden van het Hobbyscoop-team en di- 
verse mensen van vakbladen (zoals van 
PCM en de HHC-Nieuwsbrief) de geïn- 
ventariseerde software gaan beoordelen. 
Op de Utrechtse computershow, die in de 
Jaarbeurs zal worden gehouden, zullen 
de hoofdprijzen worden uitgereikt. De 
PCM-show duurt van woensdag 20 tot en 
met zaterdag 23 mei. 

De prijsuitreiking vindt op woensdag 20 
mei 's middags plaats en zal 's avonds 
worden uitgezonden via Radio 1 en 2 en 
de regionale zenders. De prijzen zijn aan- 
trekkelijk. Afgezien van randapparatuur 
zoals een reeks printers en monitoren 
(waaronder een zeer fraaie ink-jet printer 
van Hewlett Packard) kleurenmonitoren 
(Philips) zijn er nog vijf prijzen van boven 
de f 3500,- te winnen. 

De hoofdprijzen komen van Bull, Witland 
computers, Ormas-Sharp en Apple. Al 
deze bedrijven stellen een complete com- 
puter ter beschikking. Hoofdprijs is een 
Bull-Micral Advanced Technology PC, 
met kleurenkaart, monitor, harddisk van 
20 Mb en software ter waarde van f 
15.000,-. Daarnaast kan men een Yuppie- 
PC winnen en een Sharp-zakcomputer 
PC-1600, die los kan worden meegeno- 
men, maar thuis een eenheid vormt met 
printer en floppydisk. Apple stelt voor de 
wedstrijd het nieuwe II-GS model met 
kleurenmonitor ter beschikking. 

Er zijn echter nog vele tientallen andere 
prijzen. De totale prijzenpot bedraagt op 
dit moment bijna f 40.000,-; daaronder 
Zijn ook software pakketten, kleinere 
computers zoals een draagbare Canon en 
Olivetti, en de stationaire Exidy-Sorcerer 
en drie MSX-computers waaronder een 
splinternieuw model van Sony. 

Voor wie nog mee wil doen aan de wed- 
strijd die op 1 maart sluit: alle program- 
ma's zijn welkom bij Hobbyscoop op 
Postbus 1200, 1200 BE Hilversum. De 
voorwaarden zijn soepel: de software 
moet goed voldoen aan het NOS-Basico- 
de protocol, waarmee meer dan veertig 
computers kunnen werken. Uiteraard zul- 
len de (goede) programma’s worden uit- 
gezonden. De inzendingen (met toelich- 
ting) dienen op een cassetteband te 
worden ingezonden. Verdere inlichtingen 
over Basicode en het protocol ook bij 
Postbus 1200, 1200 BE Hilversum. 


Non-profit 


NOS-Hobbyscoop streeft op non-profit 
basis de verbreiding van zoveel mogelijk 
programmatuur in NOS-Basicode na. 
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Veel gevraagde programma’s zijn ook op 
cassette gezet die tegen kostprijs aan de 
man worden gebracht: 

e Best of Basicode 1: Integrale Huis- 
houdrekening f 12,50 

e Best of Basicode 2: Top Dertig van ’84/’ 
85 f 12,50 

e Best of Basicode 3: Educatieve pro- 
gramma f 12,50 

Op elke cassette staat ongeveer 300 K 
programmatuur. 

e Vertaalprogramma voor MSX-1 en 
MSX-2 f 12,50 

e Het NOS-Basicode boek (Nederlands 
en Engels), samen met de bijbehorende 
cassette met een hele reeks voorbeeld- 
programma’s kost f 27,50 


Alle cassettes en het Basicode vertaal- 
pakket worden over de post toegezon- 
den. Bestellen bij 








Alle software die Hobbyscoop uitzendt is later 
ook nog per telefoon en modem verkrijgbaar. 
Vorig jaar stelde professor Koos Verhoeff van 
de Erasmus universiteit het Fido-knooppunt 
van Hobbyscoop in gebruik. Hij deed dat met 
een geestige speech onder het toeziend oog 
van Hans G. Janssen (redactie) en dr. Albert 
van den Heuvel, programma commissaris 
NOS. 


NOS Algemeen Secretariaat, afd. 
Basicode, Postbus 10, 1200 JB 
Hilversum 


Wanneer u het pakket of de cassettes 
aanschaft op een beurs waar Hobby- 
scoop vertegenwoordigd is worden geen 
portokosten in rekening gebracht; alle 
prijzen zijn dan f 2,50 lager. 

Er is een NOS-Basicode programma voor-vele 
computers geschreven (niet allemaal in het Ba- 





De prehistorie van de computer 


Slechts cliché’s en superlatieven lijken de huidige, 
stormachtige ontwikkelingen in de informatica te kunnen 
beschrijven. Dit doet bijna vergeten hoe moeizaam en traag 
juist het proces is geweest om het rekenen te mechaniseren. 
Met een enorm vernuft bereikte men niettemin ondanks 
beperkte middelen toch opmerkelijke resultaten. De 
geschiedenis van de rekenkunde schijnt soms identiek te zijn 









Rekenen 
met 
raderen 





De abstractie van de getallen, het aantal 
vingers, in een cijferschrift was natuurlijk 
een eerste geweldige stap. Rekenstaafjes 
bestonden in China al rond 1100 voor 
Christus! In Europa verschenen deze pas 
na 1600. De namen van de Schot Napier 
en de Engelsman Gunter zijn ermee ver- 
bonden. een eenvoudig telraam, de be- 
kende abacus, was bij de Romeinen al in 
gebruik, maar de eerste echte rekenma- 
chine wordt toegeschreven aan de Duit- 
ser Willem Schickard (1592-1635). Zijn in- 
strument ging echter snel in het geweld 
van de 30-jarige oorlog verloren. Blaise 
Pascal (1623-1662) zou erdoor geïnspi- 
reerd zijn. Hij construeerde een aantal be- 
roemde apparaten, die slechts konden 
optellen en aftrekken. Kort daarna ver- 
vaardigde Gottfried Wilhelm Leibniz 
(1646-1716) een rekenmachine met de 
vier basisfuncties. Deze machines bleven 
incidenten waarover honderd jaar later 
nog met bewondering werd geschreven, 
zoals in deel V, Planches, van de Encyclo- 
pédie van Diderot en D'Alembert. 
Fabricage van rekenmachines op grote 
schaal startte pas in 1820 te Parijs met 
Charles Xavier Thomas (1785-1870) uit 
Colmar. Toestellen volgens zijn principes 
bleven de gehele 19de eeuw in productie. 
Een nieuwe fase brak aan met de toetsen- 
machine van de Amerikaan William Se- 
ward Burroughs uit 1884. In vrijwel onge- 
wijzigde vorm werden van deze machine 
in 1971 nog 3 miljoen exemplaren ver- 
kocht! 

Ook het beroemde ’koffiemolentje’ is het 





sicode-pakket opgenomen maar wel verkrijg- 
baar via de gebruikers verenigingen). 

Acorn Atom; Apple en compatibles; Aquarius; 
Aster; Atari 600 XL met uitbreiding; Atari 800 XL 
& 130 XL; BBC A en B; Electron; CBM 3000, 
4000 & 8000; Colour Genie; Commodore 64 en 
128; COMX-35; CBC 464, 664 en 6128; alle CP/ 
M-typen; DAI; Dragon 32; Exidy Sorcerer; 
Heath/Zenith H8; IBM en compatibles; ITT 
2020; KOMTEK; LNW 80; MPF-II, MSX 1 & 2; 
NASCOM/Gemini; New Brain; Oric-Atmos; 
OSI/Challenger; P-2000-T; Pet 2001; Sharp MZ 
80, A, B&K; Sharp MZ 700/800; Sinclair Spec- 
trum; Spectra/Video 318, 328 & 728; SWTPG:; 
TRS-80 |, Ill & IV; TRS-80-color; VIC-20; Video- 
genie. 


zondag 
Te ho ke) 
AM 1008 kHz 
22.40-23.00 


woensdag 


radio 1/2 
FM stereo 
19.02-19.30 








vermelden waar, een uitvinding van de 
Zweed Willgocht Theophil Odhner uit 
1874. Tot ongeveer 10 jaar geleden bere- 
kende elke handelsbank met deze appa- 
raatjes de wisselkoersen. Zo kort geleden, 
het is al bijna vergeten, verdrongen elek- 
tronische schakelingen de staffelwals van 
Leibniz. 

De tentoonstelling ‘Rekenen met raderen’ 
heeft een aanleiding in het 40-jarig be- 
staan van de Stichting Mathematisch 
Centrum. Een aantal panelen legt de prin- 
cipes van het mechanisch rekenen uit. De 





met één grote poging het rekenen te vereenvoudigen. 


bezoekers kunnen daarbij zelf een aantal 
bewerkingen verrichten. Ook zijn er een 
aantal zeldzame, historische belangrijke 
rekenmachines te zien. Tijdens de ten- 
toonstelling zal een film over rekenen wor- 
den vertoond. 


De tentoonstelling 'Rekenen met raderen’ is 
van 11 febr. t/m 3 mei 1987 in het Teylers Mu- 
seum, Spaarne 16 te Haarlem. Openingstijden: 
dinsdag tot en met zaterdag van 10 - 17 uur, 
zon- en feestdagen van 13 - 17 uur. Gedurende 
de maand februari sluit het museum om 16 uur. 


as ONDERWIJS 


BASIC 
CURSUS 





DEEL I1-2 


Nabestellen: 


Voor degenen die de eerste 8 lessen 
van deel 1 hebben gemist, zijn deze te 
bestellen door overmaking van slechts 
39,50 (incl. verzendkosten) op giro 
4998215 t.n.v. de stichting Mens en 
Wetenschap (vermelden Deel 1 Basic- 
cursus). 


Deze tweede basiccursus gaat over iets 
anders, namelijk de principes van het pro- 
grammeren voor bedrijfsleven en onder- 
wijs. Hier zal de cursus zich ook weer be- 
perken tot basisprincipes die in andere 
cursussen niet aan bod komen. Voor het 
overige wordt verwezen naar andere cur- 
sussen waarop deze cursus dus aanvul- 
lend is, en omgekeerd. 


Opmerkingen 


Een aantal opmerkingen is reeds gemaakt 
in les 1 van dit deel van de Basiccursus, 
die nu begrijpelijkerwijs in een wat hogere 
versnelling zal gaan. Nog een aantal prak- 
tische opmerkingen volgt: 


@W de diskruimte van systemen is sterk 
aan het toenemen - er kan gerust gepro- 
grammeerd worden rekening houdende 
met steeds meer en goedkopere dis- 
kruimte, indien dit de kwaliteit van het pro- 
gramma ten goede komt. 

@D 95% van alle computerkosten heeft 
betrekking op het arbeidsloon om softwa- 
re uit te denken en ook nog te verwezenlij- 
ken en te onderhouden. De hardware blijkt 
uiteindelijk slechts 5% van het totaal te 
kosten. Deze hardware wordt ook in hoog 


Afbeelding 1: 95% van alle computerkosten 
bestaat uit arbeidsloon. 


5 1 
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In de eerste Basiccursus (Deel 1) is een aantal statements 
behandeld en met name hoe steeds meer statements in een 
basicprogramma kunnen worden ingebouwd met de GOSUB 

statement. Het principe is aangegeven van dit zogeheten 
“gestructureerde programmeren”. Verder wordt aangenomen 

dat de cursist de weg weet naar andere basiccursussen, of 
Zijn basic handleiding, om ten slotte alle statements van basic 
onder de knie te krijgen. 





tempo goedkoper; programmeer dus ge- 
rust zoals u denkt dat het het beste is, ook 
al vergt uw manier van programmeren wat 
meer hardware capaciteiten. 


De tijd werkt dan niet in uw nadeel, maar in 
uw voordeel. U bent dan niet steeds bezig 
uw software te verbeteren, maar kunt het- 
zelfde softwareconcept blijven verwezen- 
lijken op steeds betere hardware. U heeft 
als het ware vooruitgedacht. 


® de IBM PC is een typische data-ma- 
chine. Dit wil zeggen dat de machine ge- 
schikt is voor verwerkingen rondom een 
database met gegevens die in keurige re- 
cords vastliggen. Dit geeft volledige con- 
trôle over gegevens, zoals dat ook hoort. 
Grafische mogelijkheden of muziek wor- 
den dan een kwestie van grafische kaar- 
ten, of aansturen van externe synthesizers 
over een seriële poort door middel van het 
“MIDI’-protocol. Deze benaderingen be- 
schermt de software-ontwikkeling en 
biedt op de langere termijn daarom meer 
voordelen dan een individuele krachtpat- 
ser als de AMIGA, waarvan de program- 
matuur niet overdraagbaar is. 


4) de IBM PC verwezenlijkt zulke staalt- 
jes als de AMIGA verricht alleen met kaar- 
ten, externe machines en/of processoren. 
De trend van de PC is dan ook maar ver- 
schillende processen naast elkaar (multi- 
tasking zoals o.a. op de PC/AT geboden 
wordt), of verschillende parallel processo- 
ren. Deze verschillende CPU's” worden 
in de opvolgers van de IBM PC kern (de 
8086 chip, wordt opgevolgd door de 
80286 (AT), 80386, 80486, en 80586) in 
één chip gesimuleerd. De nieuwere ver- 
sies kunnen straks "doen alsof” ze ver- 
schillende computers zijn, die door de 
centrale processor worden “aange- 
stuurd’. 


5) bovendien mag vroeg of laat verwacht 
worden dat er bedrijven komen die 
“80x86’s” parallel naast elkaar gaan zet- 
ten, om zeer goedkope supercomputers 
te maken. Voorwaarde hiervoor weer is 
standaardisatie rondom enkele chips, en 
dus bescherming van software ontwikke- 
lingskosten. 

6) op mainframes (grote computers) zijn 


reeds programma’s die andere program- 


ma's kunnen integreren tot schijnbaar één 
geheel, en deze aansturen als waren het 
“makro’s”’. Deze trend mag vroeg of laat 
ook op PC-achtigen verwacht worden. 





| D de dictionary” op mainframe en mi- 


nicomputers zal vroeg of laat overwaaien 
naar de PC. Een dictionary is een soort 
overzicht van de database-structuur op 
een machine. Dit maakt goed geïntegreer- 
de programmatuur mogelijk. 

MSDOS 5.0 is een Operating Systeem 
dat naar verwachting andere program- 
ma’s op andere machines zal kunnen aan- 
sturen, net als UNIX, zodat volledige inte- 
gratie naar de PC gebracht wordt. 


Toekomst 


Het is zinnig met dit soort ontwikkelingen 
rekening te houden bij computerstudie, 
-aankopen en -planning. Het bespaart 
geld later en voorkomt dat men met ver- 
ouderde apparatuur en software komt te 
zitten, náást de hoofdstroom van de soft- 
ware evolutielijn. 


Afbeelding 2: voorkom soft- en hardware aan- 
kopen naast de hoofdstroom van de software 


evolutie lijn. 


Doelstelling 


De doelstelling van de computer is als as- 
sistent te dienen ten einde moeilijke en 
complexe zaken sneller en overzichtelijker 
te maken. De computer is daarbij een fle- 
xibel stuk gereedschap dat voor de een dit 
kan, en voor de ander dat. Een gebruiker 
(die ook wel eens van gedachten ver- 
andert) wil bovendien met één machine en 
één programma alles (of liefst zoveel mo- 
gelijk) aankunnen. 


Structuur 


Als de computer dan complexe zaken tot 
een goed overzicht moet kunnen terug- 
brengen, wordt het een sport complexe 


dingen aan te kunnen met één enkel pro- 
gramma. Of complexe programma’s te- 
rug te brengen tot één enkele regel. Een 
goede programmeur is gegrepen door 
deze sport: hoe zoveel mogelijk zaken in 
zo weinig mogelijk regels weer te geven. 
Of sterker nog: hoe een programma terug 
te brengen tot één enkel principe of liefst 
ook nog één enkele programmaregel (met 
natuurlijk een aantal regels “er omheen”). 


Organisatorisch model 


Vele verschillende types van programma- 
tuur kunnen worden teruggebracht tot 
een aantal programmafases die in een be- 
drijfsmodel passen (mits dit bedrijfsmodel 
de fasen van een bedrijfs- of organisatie- 
cyclus in de juiste volgorde plaatst). De 
kern van zo’n programma dat via een be- 
drijfsmodel is gestructureerd, is de data- 
base van verschillende soorten “re- 
cords”, zeg maar de inhoud van een 
formulier, weggeschreven op een schijf. 
Een aantal formulieren wordt als “file” 
(serie) van record weggeschreven. 


Afbeelding 3: software moet in een organisato- 
risch model kunnen worden ingepast. 


Bewerkingen 


Allerhande bewerkingen kunnen als volgt 
worden bereikt: 


WW gegevens (zoals tekst, maar ook 
beelden en muziek) worden in records ge- 
zet 


@D bewerkingen worden in records gede- 
finieerd 


@3) de records van 2 worden losgelaten op 
de records van 1 | 


4) het resultaat hiervan is een nieuw soort 
record (4) 


5) record 4 wordt terugvertaald naar 
tekst, beeld, muziek, aansturing van ma- 
chines enz. enz. 

Doordat we de records in de database 
onder volledige contrôle hebben (ook fle- 
xibel), hebben we de hele cyclus volledig 
en flexibel onder contrôle (belangrijk voor 
flexibele robotisering en menselijke taalin- 
structies aan een computer, enz.). 


Taken 


We staan dus voor twee taken: 


@ gegevens vastleggen, al of niet via een 
formulier, in een database van verschillen- 
de records, 


@ bewerkingen (subroutines) op dezelf- 
de manier in records vastleggen en ver- 


Afbeelding 4: overzicht van computerbewer- 


kingen. 









record 
(data) 





record 
(bewer- 
kingen) 








record 
(data) 





actuatoren spraak 


volgens deze records op elkaar “los” te 
laten. 


In dit deel van de Basiccursus zal getracht 
worden de principes van beide te laten 
zien. Wie zich afvraagt of zoiets niet beter 
kan met exotische talen als C, Ada of Lisp, 
moet bedenken ook primitieve talen als 
Swahili of Takki-Takki in staat stellen een 
idee min ofmeer op een ander over te 
brengen. De taal geeft niet de doorslag, 
maar wel wat gezegd wordt. In andere 
talen als Basic kun je het (misschien) beter 
of sneller zeggen, maar dat komt later. Het 
idee kan ook heel goed in Basic worden 
weergegeven. 


Principes 
Al programmerende zullen nog meer pro- 


grammeringsprincipes boven water ko- 
men zoals: 


@D zet korte statements in de ruimte vóór 
regel 1000; 


@) bewaar de eerste regel voor program- 
ma-onderdelen waarvan de inhoud in het 
geheugen wegge-’"’poked’ moet worden 
(basicode 2 en 3 kunnen dus niet gevolgd 
worden, zeker niet op dit punt); 


@) gebruik de regelnummering van Basic 
(die soms als nadeel genoemd wordt), in 
uw voordeel door een vaste programma- 
indeling. Een voorbeeld hiervan volgt hier- 
na; 

4) werk alleen structureel, dat wil zeggen 
met subroutines die een vast begin heb- 
ben en een vast eind (en niet meerdere, 
zoals door teveel gebruik van GOTO). 


5) GOTO hoeft alleen gebruikt te worden 
aan het eind van de hoofdlus (waarvan alle 
gosubroutines kleinere lussen zijn), of om 
door een lus heen,te springen. 


©) werk flexibel met universele routines 
en interfaces en pointers. Bijvoorbeeld: 

® inlezen van tekens vanuit het toetsen- 
bord moet met dezelfde routine kunnen 
als inlezen vanaf de schijf of vanuit een 


seriële poort. 

® hetzelfde geldt voor wegschrijven van 
tekens naar scherm, printers of seriële 
poort. 

Dit kan door routines te definiëren waar- 
van alleen de parameters veranderen, bij- 
voorbeeld 1=printer, 2=scherm, 
3=seriële poort. 

Zijn deze mogelijkheden niet standaard in 
de PC ingebouwd, bouw ze dan zelf met 


_een universeel aanroepbare interface die 


gebruik maakt van pointers (waar de ei- 
genlijke routines staan). 


D definieer bewerkingen steeds op de- 
zelfde manier, bijvoorbeeld met namen 
van functies die een aantal argumenten of 
variabelen behoeven, zoals: 


GA NAAR het begin 

GA NAAR schermcoördinaat 10,10 
RUN programma2 

GOSUB 2000 

enzovoorts. 


Deel uw programma in aan de hand 
van “fasen” van een cyclus, dus: 

® alle inlezen van gegevens aan het be- 
gin, 

® alle bewerkingen in het midden, 

© alle wegschrijven van gegevens aan het 
eind. 

Het hele programma wordt hierdoor een 
soort van subroutine, met één ingang aan 
het begin en één uitgang aan het eind. 

Er zijn meer dan 6 of zelfs 20 fasen van de 
programmaecyclus te definiëren. Elke klei- 
nere cyclus (of lus) heeft zelf ook weer 
fasen, enzovoorts. Hiervan worden later 
voorbeelden gegeven. Het komt voor dat 
Basic-statements zelf meteen fasen pas- 
seren. Bijvoorbeeld INPUT vraagt om ge- 
gevens, die dan vanaf het toetsenbord 
ook meteen op het scherm gezet worden. 
Lijkt handig, maar is het niet, als u uw 
programma vanaf een afstand wil aanstu- 
ren en uitlezen. Voorkom dit met byte voor 
byte inlezen, en wegschrijven van de te- 
kens, zodat u alle fasen onder volledige 
contrôle heeft. Er zijn meer principes, die 
genoemd zullen worden zodra ze aan de 
orde zijn. 

©) Houd alle variabelen in één array of 
string stack. Hoewel dit meer geheugen 
kost, heeft het aantal voordelen de over- 
hand, zoals: | 

® variabele menu's, 

® strings zijn vanaf schijf in te lezen, 

© programmaparameters kunnen op 
schijf bewaard worden. 

Op dit punt schieten Basicode 2 en 3 dus 
tekort. (Basicode 1 blijft handig.) 


Programma-indeling 


Een programma-indeling met behulp van 
de regelnummering volgt hieronder: 

tot 1000 korte statements omschreven als 
subroutines, met parameters x1, x2, enz. 
en resulterende waarden y1, y2, en- 
zovoorts. Het mogen ook strings betreffen 
als X1$, X2$ en Y1$m Y2$. 

1000 het inlezen van tekens (waar ook 
vandaan) en andere organisatorische pro- 
grammadelen (worden later beschreven). 
2000 overzicht van de I/O apparatuur (In- 
put - Output, welke apparaten e.d. zitten 
gekoppeld aan welke slots). 
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3000 alle tellers, filters en security. 


4000 hoofdmenu 

5000 submenu's | 

6000 cursor aansturing 

7000 saven naar schijf, en tape 

8000 laden van schijf e.d. 

9000 schijf overzichten 

10000 indeling van de interne geheugen 
ruimte voor de verschillende activiteiten 
en files 

11000 input van gegevens in formulieren 
12000 bewerkingen 

13000 inspectie van files e.d. 

14000 correcties van bestanden en files. 
Deze correctiemogelijkheid is geheel af- 
gesplitst om accountants en leraren de 
mogelijkheid te geven alle wijzigingen te 
controleren. 

15000 het opbouwen van ’’makro’s”’, dus 
series van instructies die met één woord 
aangeroepen kunnen worden. 

16000 wegschrijven naar het scherm, en/ 
of een seriële poort (indien u programma’s 
vanaf een afstand wilt kunnen ”draaien’”) 
17000 wegschrijven naar printer, plotter 
enz. 

18000 netwerkaansluitingen (inclusief de 
simpelste) 

19000 trends van de teller gegevens (bij- 
voorbeeld een overzicht van hoeveel 
bytes per dag zijn ingetikt, of hoe lang een 
leerling gemiddeld bezig was) 

20000 coderingen 

21000 wijzigingen van het programma zelf 
(dat met het programma gedaan kan wor- 
den!) 


In de praktijk blijkt de bovenstaande num- 
mering meer dan voldoende. Andere ge- 
gevens kunnen gezet worden v.a. regel 
22000. 


Vaste gegevens 


Een aantal vaste gegevens dat nodig is 
om het programma opgestart te krijgen, 
kan hier komen te staan, vanaf regel 
22000. Beter dan DATA-statements te ge- 
bruiken is het om strings in een DIM array 
te definiëren. Reden is dat de strings dan 
ook op schijf kunnen worden gezet of van- 
af een schijf geladen. Alle menu-strings 
e.d. kunnen bij het opstarten vanaf een 
schijf worden geladen. In het begin moe- 
ten ze echter nog worden gedefinieerd, 
totdat het programma zo ver is, dat de 
gegevens op schijf bestaan. Voordeel is 
o.a: 

® codering van menu-strings, 

® menuversies kunnen worden geboden 
in verschillende talen 

en andere voordelen 

© als de strings later op schijf staan, kun- 
nen de string definitieregels v.a. 22000 
weer uitgewist worden en wordt extra pro- 
grammaruimte teruggewonnen. 


Waar de menu-strings en andere pro- 
gramma-constanten zeker niet thuisho- 
ren, is verspreid in het programma. Er is 
dan geen overzicht en geen mogelijkheid 
snel parameters te wijzigen. In een goed 
programma zijn alle parameters afzonder- 
lijk gedefinieerd en snel aan te passen. 


Stap voor stap 


Laten we maar eens kijken wat er nodig is 
om een programma stap voor stap op te 
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bouwen. | 
20 IF S=0 THEN GOTO 1300 


Alle parameters zijn O wanneer het pro- 
gramma voor de eerste keer opstart. Maar 
als gechained wordt vanuit een ander pro- 
gramma, hoeft S niet meer nul te zijn. 
Daarom zorgt regel 20 voor een sprong 
naar regel 1300, waar een DIM statement 
zorgt voor een string stack d.m.v. een ar- 
ray. 

1300 ‘definieer de string stack 

1310 DIM S$(1000) 

1320 DIM S(100) 

1330 GOTO 22000 


Opmerkingen: 

WD let op dat ergens een S=1 of iets der- 
gelijks moet komen te staan voordat de 
CHAIN statement vanuit een ander pro- 
gramma dit programma weer kan opstar- 
ten; 

@D er wordt nogal ruig omgesprongen 
met ruimte in dit programma, bijvoorbeeld 
de tekst in regel 1300 kost ruimte, en regel 
1310 en 1320 kunnen eigenlijk op een re- 
gel, samen met regel 1330. Dit kan ook 
nog in een later stadium en de oorspronk- 
lijke versie kan dan bewaard blijven, voor- 
zien van veel tekst en uitleg in de REM 
statements (beginnen met REM of *), en 
voorzien van een structuur en overzichte- 
lijke regelnummering; 

® let op datGOTO wordt gebruikt om 
door het programma heen te springen 
naar het string-datagebied in 22000. Aan 
het eind van gebied 22000 wordt weer 
met GOTO naar het begin van het pro- 
gramma gesprongen. 


Het stringgebied 


In het stringgebied op 22000 gaan we nu 
de strings definiëren die we denken nodig 
te hebben voor het programma. Zoals de 
strings nodig voor hoofd en submenu's. 
Die strings komen dan in een standaard 
file, die we op dezelfde manier kunnen 
printen en manipuleren als andere files, 
die uit records in de database komen. 
(Feitelijk hopen we de menu's later ook in 
een database weg te kunnen schrijven.) 
Alles gedachtig het idee: programmeer 
alles rondom één idee, of zelfs één routine 
of regel. In elk geval betekent dit steeds 
woekeren met principes en zoveel moge- 
lijk tot zo weinig mogelijk principes terug- 
brengen. 

In geval van de strings voor de menu's is 
dit nog wel gemakkelijk: gewoon strings 
achter elkaar voldoet wel, zoals "Menu 
1", ”Keuze 1.1”, Keuze 1.2” etc (of equi- 
valent), maar er zijn andere factoren: 


QQ de menu-strings moeten op dezelfde 
wijze in elkaar zitten als record-velden en 
de records in een file; 


€) er moet informatie zijn waar de velden 
op het scherm geprint worden; 


® deze coördinaten kunnen wel weer af- 
zonderlijk in velden worden gezet, maar 
dan wordt het complex. Beter is de coör- 
dinaten te koppelen aan de velden. Vel- 
den kunnen dan met coördinaten eraan 
gekoppeld, via een seriële poort worden 


overgeseind en door de ontvangende 


computer meteen op de bedoelde 
schermcoördinaat weggezet worden. 
Zonder de vertraging die optreedt doordat 


een hele pagina moet worden overge- 
seind zoals in het Viditelprotocol. Hoewel 
in de toekomst wel snellere data-over- 
dracht verwacht mag worden, zal hier 
toch een prijskaartje aan blijven hangen. 
Overzenden van enkele velden met coör- 
dinaten zal te allen tijde een factor goed- 
koper blijken. 

@ de veldnaam moet eigenlijk tesamen 
met de veldinhoud overgezonden wor- 


den. Een klacht over “veldnaamloze’”’ pro- 


tocols is bijvoorbeeld, dat de ontvangen 
data voor de mens onleesbaar zijn, wat 
van belang is in het Midden- en Klein- 
Bedrijf. Toevoegen van coördinaten en 
veldnaam geeft gemiddeld een verdubbe- 
ling in de hoeveelheid over te zenden 
bytes, wat nog altijd beter is dan bij elk 
veld een heel scherm over te zenden of te 
wachten op meerdere velden, met alle 
vertraging vandien in beide gevallen. 


® er moet nog informatie worden toege- 
voegd wat voor stringsoort het betreft, bij- 
voorbeeld 00 voor de velden van een re- 
cord, en 10, 11, enz voor de records zelf. 
Op deze wijze is er één formaat (indeling) 
voor zowel de velden van een formulier, 
als tabellen van records. 


GG er moet dan nog informatie komen 
waar de “header” (veldnaam) ophoudt en 
waar het veld zelf begint, bijvoorbeeld: 
DATUM: 14 december 1986 

AFZENDER: N.O.S. 

Hiervoor is nog een byte nodig, omdat de 
headerlengte wel niet langer zal zijn dan 
255 bytes; 

@ misschien is het nog verstandig een 
byte op te nemen om aan te geven wat 
voor inhoud in het veld staat, zoals alfabe- 
tische tekens of alleen nummeriek, enz. 


Andere eisen 


Er zijn nog andere eisen, zoals de naam- 
geving en specificatie van het blok van 
records dat u op uw scherm gaat invullen 
en hoe u de informatie weg gaat schrijven 
in de database. Of u het gelooft of niet, bij 
elk programma is het ontwerp van de da- 
tabase het eerste belangrijke werk. Een 
heel simpel maar universeel ontwerpje 
volgt in les 3 van deze cursus. 


Dr. W. van Tend 
Computeranimaties W. van Tend 


Tekenen 


met de 
computer 


Fractals ontstaan wanneer we de volgen- 
de truc toepassen. Neem een lijnstukje en 
deel dat in bijvoorbeeld vier gelijke stuk- 
ken. Vervolgens laten we het eerste stukje 
zoals het was. Aan het tweede stukje 
hangen we een vierkantje, met zijden ge- 
lijk aan de lengte waarin we onze lijn ver- 
deelden. Bij het derde stukje van de lijn 
zetten we net zo’n vierkantje òp de lijn. Het 
vierde stukje laten we weer zoals het was. 
Tenslotte halen we van het tweede en der- 
de stukje van de lijn het oorspronkelijke 
lijnstukje weg. We krijgen dan een rech- 
thoekig zig-zag patroon dat uit allemaal 
precies even lange stappen bestaan (dit 
hebben we ook al eens in A&K/DJO 
4/1985 gedaan, in ons verhaal over chaos 
in de computer). De werkwijze die we net 
hebben beschreven, kunnen we een groot 
aantal keren herhalen, waarbij we een 
steeds ingewikkelder zig-zag patroon krij- 
gen. Het opmerkelijke van het patroon is 
dat de structuur ervan steeds dezelfde 


Basicode-2 listing voor het tekenen van fractals 
op het tekstscherm van vele type computers. 


Met de computer kunnen we allerlei wiskundige figuren 
tekenen. Een voorbeeld zijn de zogeheten fractals, die een 
heel fijne structuur hebben. Daarvoor geven we hier het 
programma. 


blijft. Als we een heel ver doorgewerkte 
fractal sterk zouden vergroten, zouden we 
overal weer hetzelfde patroon zien dat we 
bij onze allereerste bewerking ook te zien 
kregen. 


Het programma 


Dit computerprogramma laat op het 
beeldscherm een fractal ontstaan. Beter 
gezegd, het maakt een begin met een 
fractal, want eigenlijk moeten de lijnstuk- 
jes eindeloos verder opgedeeld worden. 
Schrik niet van de lengte van het program- 
ma. De meeste regels zijn opREMkingen, 
die de computer niet ingevoerd hoeft te 
krijgen. 

De punten van de figuur worden met $-te- 
kens aangegeven. Al heel gauw loopt het 
programma tegen de grofheid van de 
weergave op. 

Wie méér wil, een computer heeft met 
goede grafische mogelijkheden en daar- 
mee goed vertrouwd is, kan het program- 
ma veranderen om die grafische mogelijk- 
heden uit te buiten. In de grafische versie 
gaan we niet uit van een lijn, maar van een 
vierkant, dat getekend wordt met de op- 
dracht LINE... B in regel 210. Dit vierkant 


10 REM 

ARE feaatels. fijn 

30 REM versie voor msx 

40 REM veranderingen voor ibm-pc/ms-dos 
20 REM (gwbasic) zijn aangegeven 

60 REM 

20 NH=8 


88 DIM HOBBELSCNH) 

30 SCREEN 2 

100 REM ibm:XB=150:YB=150 
118 XB=60:YB=145 





moeten we een linkeronderhoek (het be- 
ginpunt) en een zijde geven, die passen bij 
de eenheden op ons beeldscherm. We 
slaan de figuur niet meer op in een eigen 
DIM variabele, maar gebruiken de punten 
van het beeldscherm om de figuur te ont- 
houden (beter gezegd: het gedeelte van 
het geheugen dat toch al wordt gebruikt 
voor het vasthouden van de informatie die 
op het beeldscherm staat). De eigenlijke 
tekenopdracht is LINE... (zonder BĲ) (re- 
gel 520), die een lijnstuk op het scherm 
zet: 


408 IF POINTCX+SENCXIJ, Y+SGNCYIJJ=1 GOTO 280 


120 X=XB:Y=YB 418 IF POINTCX+SGNCY1), Y-SGNCX1)D=1 THEN D=1:G0T0 430 


130 REM event Ì tal hi 
| ventueel geta eronder aanpassen 420 D=3 





148 REM om tekening vierkant te maken. 
150 REM sommige bake BORRE bed, EO NH 
168 YKL=.B8 440 HOBBELSCIJ=CHOBBELSCIJ+D) | 
120 ZYDE=128:XE=XB 4508 IF HOBBELSCIJ>=4 THEN HOBBELS(IJ=HOBBELS(IJ-4 
188 CLS 460 NEXT Ï. 
198 Xl=1:Y1=0 470 GOTO 280 
SAE ike cs 490 REM \bmtie ZYOE THEN 
iT B N LDm- dje s 
zo He Ee delen fed he bd MidE 500 IF-Z2YDE>2 THEN RESTORE :GOTO 230 
PPR Fest. TO: NH 218 END 
240 READ HOBBELSCIJ DZ LEENE CX YI REXIKZYDE, Y+YIKZYDEN KLEUR 
2 ME ATL 939 RETURN 
260 DATA 0,1,0,3,3,0,1,9 S4H REN copyright (eJ-1987 
270 XEXB:Y=YB 55 REM Stichting Mens en Wetenschap, 
28e OR Ie. 1 TO NH 560 REM Huizen NH. 


238 RICHT=HOBBELS(IJ 

308 IF RICHT=0 THEN Xl=l:Y1=0 

318 IF RICHT=1 THEN X1=B:Yl=-YKL 

324 RIGHTEZ THEN Xl==1:vi=8 

Oeh RLC THEN MSD EPTENKE 

340 IF I=l THEN ZYDE=ZVYDEX4:KLEUR=0:GOSUB 520:2YDE=ZP 


Het lange programma is in Basicode-2 en kan 
op de bekende manier op verschillende types 
computer worden gedraaid. 


1000 A=50D:GOTOZOEIEREN fractals grof 


5 1012 NH=8 
JEZAAKLEUR EI 
3508 GOSUB 520 1820 REM richtingen van. de lijnstukken 
Ko | 10308 REM 
JOB AAE KZY DE 
hj dr 1848 DIMHSCNH) 
SA VELE IKZYDE 
380 NEXT 1 1950 REM 
1960 REM schermgrootte en —opslag 


3390 IF X=XE AND Y=YB GOTO 480 
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Rien van Dongen 


De computer 


zoekt het 
maar uit! 


Zoeken in een woordenboek 


In "TAAL GOED’ (uitgeverij Thieme) staat 
een oefening over het gebruik van het 
woordenboek. Het gaat erom de grond- 
vorm van een woord of de kern van een 
uitdrukking te vinden. Als je wilt weten wat 
‘gedomineerd’ betekent dan moet je het 
hele werkwoord nemen en dat opzoeken. 
Willen we opzoeken wat ’voor iemand in 
de bres springen’ betekent, dan is het 
woord ’bres’ de kern waarnaar we moeten 
zoeken. Maar hoe weten we dat? 

We vergelijken alle woorden uit de uit- 
drukking met woorden in ons geheugen. 
Vele woorden zijn gewone woorden. 
Daarmee krijgt de uitdrukking geen bij- 
zondere betekenis. De zin 'voor iemand in 
de sloot springen’ bevat enkel gewone 
woorden en de zinsbouw is ook heel ge- 
woon. Het woord ‘bres’ moet dus wel de 
kern zijn in bovengenoemde uitdrukking. 
Dat deze redenering niet geheel sluitend is 
zien we aan de zin: De verkeersagent 
kreeg iets in het oog. 

Die zin bevat enkel gewone woorden en 
wat er staat zou best letterlijk waar kunnen 
zijn. Toch voelen we aan dat de agent niet 
voor zijn oog naar de dokter moest maar 
iets opmerkte. Het is duidelijk dat we al- 
leen met heel veel kennis en ervaring in 
staat zijn in een zin een uitdrukking te vin- 
den. Het vinden van het hele werkwoord 
van ‘gedomineerd’ is veel eenvoudiger 
omdat we alle vervoegingen van een 
werkwoord als rijtjes in ons geheugen 
hebben. Dat zou een flinke computer mis- 
schien ook wel kunnen! Bij die oefening 
moest ik ineens aan die onhandige invul- 
formulieren denken. Waarom kan ik zelf 
wel de adressen van brieven alfabetisch 
ordenen en de computer niet? 


De adressenbak op zijn kop 


Om te weten te komen hoe dat alfabetise- 
ren werkt heb ik mijn hele kaartenbak om- 
gekeerd. 

Mijn kaarten beginnen altijd met het tele- 
foonnummer en daaronder het adres 
zoals dat op een brief moet staan. Op 
sommige kaarten ontbreken gegevens 
maar daarvoor is wel ruimte gelaten om ze 
later in te kunnen vullen. Verder heb ik de 
gewoonte om opmerkingen achter het te- 
lefoonnummer te zetten, dan vallen ze 
goed op. Van de honderden kaarten heb ik 
er een stuk of tien opgeraapt en de gege- 
vens daarvan in mijn computer gestopt, 
dat was ik toch al lang van plan. In BASIC 
gaat dat heel gemakkelijk met dataregels. 
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Ook wel eens boos geworden op zo’n invulformulier? Nog 
maar net zijn we gewend aan de volgorde van postcode en 
plaatsnaam en dan moeten we eerst de plaats invullen en dan 
de postcode. Of we moeten het adres nà de woonplaats 
opgeven. Nog gekker, soms moeten we eerst onze 
achternaam en dan pas het voorvoegsel en de voorletters 
noteren. Alsof computers niets zelf uit kunnen zoeken! 


Het gebruik van aanhalingstekens is 
noodzakelijk omdat de gegevens schei- 
dingstekens kunnen bevatten (bijv. kom- 
ma’s) waardoor er bij het lezen van de 
gegevens problemen kunnen ontstaan. In 
figuur 3 staat het resultaat van mijn werk. 


25003 rem *« data adressen Ean 
25991 data”935 772461” 

25992 data”NOS Hobbyscoop” 

25993 data”Postbus 1209” 

25094 data” 1209 BE Hilversum” 


data” 
25996 data”287 836782 Noorwegen” 
25997 data”Fam. H.L. Pevaa 

25998 data”Breistrand” 

25999 data”8754 Avinskjer” 

25919 data”Noo egt ne cas 

data”@79 195987 tot juli 1987” 


25011 

25912 data”Fam. J. Wilenga” 

25913 data”Titus Brandsmaweg 275” 
25014 data” 2486 RC Zoetermeer” 

25915 data” 

25916 data”979 195987 na juli 1937” 
25917 data”Fam. ‚ Wilenga®” 

25918 data”Cornelis Schefferstraat 93” 
2001 OREN"... Den Haag” 


25921 data”@45 333777 fam. de Sterren” 
25922 data”de Maan, Caravan stalling” 
25923 data”Zonweg 148/e 
25024 er ad Kerkrade” 
25925 data”” 
25026 daE2-02152 58388 Andries Sabelis” 
25027 data”Aarde en Kosmos” 
25928 data”"Eemlandweg 5a / Postbus 198” 
25929 data” 1270 AC Huizen Nh. 
25039 data” 
BOE RARER eee Tate e 
25032 Eetnrden BASICODE” 
25933 data”Postbus 1419” 
25934 ad et Ean BK Eindhoven” 
a 
25936 data”@9 lt pr ak: Nico en Ans” 
25937 data”Fam. N. de Boom 
25938 data”Rue de Croixis 113” 
25939 data”2916 Bole 
25949 data” „Zwitserland®” 
L5041 HERT oe sate ee 
25942 data”the Kranley van StruikLtd.” 
25943 data”314-211 Onglesay Blvd. 
25944 data” en ton Ontario” 
25945 data”MaC 2 Canada” 
25046 data-094484361075 Irma en Paul” 
25947 data”Fam. P. Kassol -van Belvort” 
25948 data”79 Wolmsley Road” 
25949 data”Broadstairs Kent” 
25959 data”CKk14 2AL Engeland” 
25951 data”@1234 9876 proef adres” 
25952 data”F” 
25953 data”Straatje 4” 
25054 data”8888 ee Plaatsje” 
25055 data” 
25056 data”.” 


Voornaam, achternaam of eigen- 
naam? 


Omdat we losse kaarten gebruiken is het 
onderscheid tussen het ene en het andere 
adres in de kaartenbak gemakkelijk te ma- 
ken. Zodra de adressen op een lijst bij 
elkaar staan moeten we steeds wat ruimte 
open laten tussen de adressen. Voor de 
computer is het voldoende als we alle 
adressen uit evenveel regels op bouwen. 
Voor een telefoonnummer, naam, straat, 
plaats en eventueel het land zijn vijf regels 
nodig. 

Bij het bestuderen van de adressen valt op 
dat er verscheidene soorten postcodes 
zijn. Gelukkig zijn de nederlandse allemaal 
hetzelfde opgebouwd zodat de binnen- 
landse post eventüúeel op postcode ge- 
sorteerd kan worden. (Gesorteerde post 
kan goedkoper verzonden worden.) Met 
behulp van een tabel met buitenlandse 
postcodes moet het ook mogelijk zijn de 





buitenlandse postcodes te herkennen en 
te sorteren. 

Na de postcode staat de plaatsnaam. 
Ontbreekt de postcode, dan zijn de eerste 
letters op de regel van de plaatsnaam. De 
plaatsnaam is dus ook eenvoudig af te 
leiden. Sorteren op plaatsnaam zal ook 
wel niet zo moeilijk zijn. Het enige waar we 
goed op moeten letten is het verschil tus- 
sen hoofdletters en kleine letters. Voor de 
computer is 'Den Haag’ met een hoofdlet- 


rem &*& eerst basicode routines! xx 
a=5000:goto20:rem ** adressenbak & 
gosub 160: rem scherm wissen 
print”Eerst even de data tellen. 
nn=@: restore 
Ree a=@ to 1 

ead a$:nn=nn+1 

en as$="." then a=1 


ne 
eh DR 1:dim a$(nn,5) 

rem nn nn nn nn nn nn en en en en en nn en nn en en en ne 
rem &* zet DR of Phú in de rij 
print”Nu gaan de data in de rij. 
restore 

for a=@ to nn 

for b=@ to 4 

read ‘aided 


rem &&# koppel sleutel aan data «+ 
print hiet wordt toegevoegd.” 
for k=® to 

en 11600: rem leid sleutel af 

as ( ane 


vraag om printer EE 


Bleie op printer afdrukken” 
input a 
if a$<>”” then a$=lef t$(as,1) 
if(as="J") or a$="j") then pr=i 
baat ** start voor alfabetiseren #4 
gosub , 10@: rem scherm wissen, 
print”De adressen worden nu 
print”een voor een pe B 5 
ded nnn nnn manen nn nn en en nn en an 

** stel startwaarden in &% 
kk$=chrs (32) :rem start-kleinste 
FOM---==mmee eee ee 
rem #4 alfabetiseer de adressen &4 
for hh=8 to 1 
rs beid oled 

„-1:ream nr. van vargend adres 

rem zoek volgende in de lijst 
for z=@ to nn 
bwz=@: rem sy las voor adres bewaren 
s$zas(z, 
if (e8<g5e Jana (es>kke) then bw=1 
if bw= hen gg$=s$:vl=z 
next zZz 
rem verwerk het gevonden adres 
if vl>-1 thengosub1i3006: rem afdruk 
if dj en 1 then kk$za$(vl,5):hh=@ 
nex 


e 
@ 
@ 
@ 
@ 
@ 
@ 
@ 
ij 
9 
@ 
@ 
@ 
@ 
@ 
7) 
@ 
@ 
@ 
9 
7 
@ 
@ 
7) 
e 
@ 
9 
8 Een 
pr= 

@ 
7) 
@ 
@ 
9 
@ 
@ 
@ 
@ 
9 
) 
@ 
9 
7) 
@ 
@ 
@ 
@ 
@ 
@ 
@ 
@ 
@ 
@ 
@ 
o 
@ 
@ 


leid sleutel af 
if as(k, 1) <>*”* then gosub 11106 
ders F] he ann nn nn nn en 
ascii om, zoek naam 
br=len(as tk, 


hi 
ac=abs aneh eer ”a”)) 
‚amide dak is 
mtentdetet en 1),mm,1) 
aszasc{(a$) 
if a$=".* then 
if as>ac+64 than bnc rt tue 
ct an ke wij 
nex 
ke £“pr=br then pt=1 


OOS 


ren maak sleutel 
s$="":iszi:azasc(l”"A"):zza+26 
for mm=pt to br 
weeasc (mids (as tk’ 1),mm,1)) 
i (as>=za)and(as<z) then s=mm : mm=b r 
next mm 
TRAS eed ‚br=-s+1) 

then s$z=s$tlef t$(b$,‚,s-1) 
s$=s5$tas(k,0) 
return ren hennen adatentehetedtadatee 
@8 rem 
19 for ere @ to 
20 sr$za$(vl,af) 
3030 print sr$ 
13948 rem als pr 1 is ook naar printer 
bE tn if Re then gosub 350:gosub 360 


13078 print 
13688 if pr=1 then gosub. 360 
13098 return: rem----—=-----=……- 


OD NOU B U) NO et OO DO NNU DIN ee 
OSSGSSESESELNUIOSGEEEEEESLEE 
he | 


CIL om oo ep eg 
OOONNDNDNDNDNNDNN Ne eo op oo oe eo go oe (SO 


ter D aan het begin iets anders als de 
zelfde naam met een kleine letter d. 

Wat lastiger wordt het als we op naam 
willen sorteren. Waar staat de naam? Er 
zijn vier typen regels met een naam er in: 
e zonder voorletters en dergelijke 

e met een voorvoegsel in kleine letters 

e met voorletters of andere afkortingen 
e met afkortingen op het eind (b.v. bij- 
voorbeeld) 

We kunnen eerst kijken waar de laatste 
punt staat. Omdat we daarbij teken na 
teken bekijken kunnen we meteen alle let- 
ters van één soort maken (bijvoorbeeld 
allemaal kleine letters). Als we geen puntje 
vinden of de punt staat helemaal aan het 
einde dan moeten we vanaf de eerste 
hoofdletter die regel voor de naam gebrui- 
ken. Staat er wel een puntje ergens in de 
regel dan moeten we zoeken naar de eer- 
ste hoofdletter die daarna komt. Op die 
manier vinden we een naam die volgt op 
eventuele voorvoegsels als 'van’ of ’de’. 
Zo kunnen we een naam afleiden die bij 
het sorteren te gebruiken is. 


Hele families met dezelfde naam 


Toch hebben we nog een probleem over 
het hoofd gezien. Het is namelijk, zeker bij 
de adressen van de familie, heel goed mo- 
gelijk dat er twee of meer dezelfde namen 
voor komen, zelfs met dezelfde voorna- 
men. In de gegevens kunnen we moeilijk 
zetten: ‘de oude Gerritsen’ en ’'de jonge 
Gerritsen’. Neem de adressen van Wilen- 
ga als voorbeeld. 

Eerst halen we de achternaam van de re- 
gel af 'wilenga’ (allemaal kleine letters nu). 
Daarachter zetten we het voorste deel 
‘fam. j.” zodat we krijgen: 'wilengafam. j.”’. 
In dit geval is dat nog niet voldoende om 
de beide adressen van elkaar te onder- 
scheiden want de voornamen zijn hetzelf- 
de. Daarom zetten we er ook nog de eer- 
ste regel achter. Meestal is het 
telefoonnummer wel voldoende om het 
onderscheid te maken. Mensen die op 
verschillende adressen wonen hebben 
een verschillend telefoonnummer. In dit 
zeer bijzondere geval ontstaat echter pas 
door de opmerking achter het telefoon- 
nummer het verschil tussen beide adres- 
kaartjes:e wilengafam. j. 079 105987 na 
juli 1987 

e wilengafam. j. 070 105987 tot juli 1987 
We hebben nu een sleutel aangemaakt 
waarmee de computer kan sorteren. Dit 
lijkt een extreem voorbeeld maar toch 
kwam ik het echt tegen in mijn kaarten- 
bak. Omdat deze familie gaat verhuizen 
(het telefoonnummer kan dan behouden 
worden) had ik alvast een nieuwe kaart 
gemaakt. 


Computer vervangt kaartenbak 


Het hiernaast afgebeelde programma vol- 
doet voor het sorteren van mijn adressen. 
Er wordt in dit programma een heel sim- 
pele sorteermethode gebruikt. Zelf zou- 
den we ook zo te werk kunnen gaan. 
schrijf op elke kaart de sleutel. Zoek de 
eerste kaart en dan de daarop volgende 
enzovoorts. Steeds alle kaarten nakijken, 
niet zo vernuftig maar het werkt goed ge- 
noeg voor een programma dat maar af en 





rechte lijn 





Dr. W. van Tend WISKUNDE 


De vergelijking van een 





Gegeven twee punten in het vlak, bijvoorbeeld (1,5) en (4,-5). 


leder jaar opnieuw krijgen leerlingen in het 
voortgezet onderwijs talloze malen een 
dergelijke opgave voor hun neus. Talloos 
is ook het aantal malen dat op weg naar 
het antwoord een rekenfout wordt ge- 
maakt. Met het computerprogramma bij 
dit artikeltje rolt de vergelijking er feilloos 
uit. | 

Een belangrijk begrip bij lijnen in het vlak is 
de richtingscoëfficiënt. Deze is nul voor 
horizontale lijnen. Voor lijnen die onder 45 
graden omhoog gaan, is de richtingscoëf- 
ficiënt 1. Voor lijnen die onder 45 graden 
naar beneden lopen, is hij -1. Vervelend 
wordt het met de richtingscoëfficiënt bij 
verticale lijnen. De richtingscoëfficiënt is 
dan "niet gedefinieerd” of “oneindig”, al 
naar gelang we gewend zijn met wiskundi- 
ge benamingen om te gaan. Om ook verti- 
cale lijnen aan te kunnen, maakt het pro- 
gramma geen gebruik van de 
richtingscoëfficiënt. Bij een verticale lijn 
wordt de vergelijking iets als 


(5).x+(0).y=15. WE KUNNEN DIT ZELF 
VEREENVOUDIGEN TOT X=3 (links en 
rechts delen door vijf). 

Bij het voorbeeld van de lijn door (1,5) en 
(4,-5) is de uitkomst (-10).x+(-3).y=-25. 
Als we zelf de berekening gedaan hadden, 





toe een alfabetische lijst moet maken. In- 


tussen heb ik bijna alle adressen in de 


computer gestopt en gebruik ik de kaar- 
tenbak voor het opbergen van diskettes. 
Voor het sorteren van die schijfjes heb ik 
nog geen goede methode…. Wie helpt? 


Wat is de vergelijking van de rechte lijn door die twee punten? 





zouden we waarschijnlijk 10x+3y=25 ge- 
schreven hebben. Dit herleiden laat de 
computer aan onszelf over. 

Als we toch ook de richtingscoëêfficiënt 
moeten weten, dan kan dat. Neem het 
getal dat in de vergelijking vóór de x staat, 
deel dat door het getal vóór de y en zet 
een minteken voor het resultaat. In het 
voorbeeld is de uitkomst -(10:3) oftewel 
-3fi. 

Wanneer we regel 1000 weglaten, kan dit 
programma ook zonder de gebruikelijke 
Basicode-voorloper worden gedraaid. 
Wel eisen sommige computers dat we 
spaties tussenvoegen achter Basic-woor- 
den als INPUT en GOTO. 


Met dit computerprogramma kunnen we over 
allerlei rekenfouten heenspringen. 


1999 A=190:GOTO20 :RENM 
1818 PRINT 

1929 PRINT“Dit programma geeft de" 
1939 PRINT"vergelijking van de rechte" 
1948 PRINT“lijn door twee punten," 
1059 PRINT“waarvan de coordinaten” 
1069 PRINT"“worden ingevoerd." 

1979 PRINT 

1988 PRINT“ x-waarde eerste punt "5 
19393 INPUTXI 

1199 PRINT"y-waarde eerste punt “5 
1118 INPUTYI 

1129 PRINT"x-waarde tweede punt “5 
1139 INPUTX2 

1149 PRINT"y=-waarde tweede punt “; 
1158 INPUTY2 

1168 PRINT 

1129 A=Y2-Y1 

1189 B=Xl-X2 

1199 CEXIKY2-X2£YI 

1299 PRINT"een vergelijking is :" 

1210 PRINT" CTA), PCT EE Ne ek 
1229 GOTO1979 

32009 REM 

32019 REM dit is een 

32920 REM Basicode-2 programma 

32939 REM van 

32949 REN 
32959 REM 
32059 REM. 
32979 REN 
32088 REM 
32090 REN 
32199 REM 
32119 REM 


rechte lijn 


Pim van Tend 
Ve ldhe imwg 8 
6871 CO RENKUM 


copyright (Cc) 1987 
Stichting Mens en 
Wetenschap, Huizen NH 


Het computerprogramma aan het werk. … 


Dit programma geeft de 
vergelijking van de rechte 
lijn door twee punten, 
waarvan de coordinaten 


worden ingevoerd. 

x-waarde eerste punt ? Ì 
y-waarde eerste punt ? 5 
x-waarde tweede punt ? 4 
y-waarde tweede punt ?-5 


een vergelijking is: 
C=100 Jit Jr en 
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Gitaar- 





diagrammen 





Accoorden klinken op commando 


Het programma GITAAR is een BASICO- 
DE-3 programma dat een aantal gitaardia- 
grammen bevat. De computer toont ze op 
het scherm, en kan ze ook spelen. Als we 
het programma starten, dan verschijnt er 
op het scherm enige uitleg over hoe het 
programma werkt, een korte inleiding dus. 
Daarna moeten we invoeren of het geluid 
aan moet staan of juist niet. Daartoe tikken 
we een J van ja of een N van nee in. Vervol- 
gens moeten we invoeren hoe lang een 
diagram op het scherm blijft staan. Dat 
moeten we invoeren met twee cijfers, dus 
8 seconden wordt Z8. De computer 
vraagt of we op een toets drukken, en dan 
kunnen we accoorden gaan kiezen. 


Gitaar spelen met het toetsenbord 


In het programma zitten de volgende ac- 
coorden: de drieklanken CG, DES, D, ES, E, 
F‚, GES, G, AS, A, BES, B en de mineur 
drieklanken CM, DESM, DM, ESM, EM, 
FM, GESM, GM, ASM, AM, BESM, BM. 
Zoals ze hier staan moeten ze ook inge- 
voerd worden, alleen maakt het niet uit of 
we hoofd- of kleine letters gebruiken. Als 
we een aacoord gekozen hebben drukken 
we op de invoertoets, waarna de compu- 
ter met het accoord aan de gang gaat. Hij 
tekent op het grafisch scherm een gitaar- 
diagram en toont waar de vingers op de 
snaren moeten staan om het betreffende 
accoord te laten weerklinken. 


Werken met gitaardiagrammen 
Zo’n gitaardiagram is eigenlijk een teke- 
ning van de hals van de gitaar. Als er hele- 
maal boven op een snaar een open rondje 
staat in het diagram dan betekent dat: 
deze snaar alleen maar aanslaan (een 
open snaar). Als er iets lager een gesloten 
rondje staat dan betekent dat: 
de snaar op de eerste fret drukken en dan 
aanslaan. Een fret is zo’n dwarsbalkje dat 
op de hals van de gitaar zit. Als er hele- 
maal beneden in het diagram een geslo- 
ten rondje staat dan betekent dat: 
de snaar op de vijfde fret drukken en dan 
aanslaan. Zo kan er dus ook een gesloten 


rondje staan op de tweede, de derde en. 


de vierde fret. Op deze manier staat er in 
het gitaardiagram wat-er met de zes sna- 
ren moet gebeuren om het juiste accoord 
te kunnen spelen. 

Als we een basgitaar bespelen, die maar 
‚vier snaren heeft, dan moeten we alleen 
de laagste vier snaren uit het diagram be- 
kijken. Dat zijn de vier snaren aan de lin- 
kerkant. 

Als het diagram op het scherm staat, en 
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In de muzieklessen op school moeten de leerlingen vaak leren 
omgaan met de notenbalk. Een vrij ingewikkeld systeem om 
muziek op papier te zetten, dat je zomaar niet kunt leren. Er 
zijn echter nog andere manieren om muziek op te schrijven, 

bijvoorbeeld met gitaardiagrammen. Gitaardiagrammen geven 


we hebben de muziek aangezet, dan 
speelt de computer het gekozen accoord 
nog ook. Snaar voor snaar laat de compu- 
ter horen welke toon er uit de gitaar moet 
komen (hij speelt het accoord gebroken). 
Op deze manier kunnen we met de com- 
puter meespelen. Omdat we in het begin 
van het programma zelf hebben bepaald 
hoe lang het gitaardiagram zichtbaar blijft, 
kunnen we in ons eigen tempo leren om- 
gaan met de gitaar en de diagrammen. 


Speciale opdrachten 


In plaats van een accoord kunnen we ook 
een opdracht invoeren in de computer. 
Zo’n opdracht is bijvoorbeeld START. Het 
programma begint dan helemaal op- 
nieuw. De inleiding verschijnt weer, we 
moeten het geluid aan- of uitzetten en op- 
nieuw bepalen hoe lang een gitaardia- 
gram zichtbaar blijft. Een andere opdracht 
is STOP. Deze opdracht laat het program- 
ma stoppen. 

Tenslotte hebben we nog HERHAAL. De 
computer houdt de hele tijd bij welke ac- 
coorden we gekozen hebben. Als we 
HERHAAL invoeren, dan herhaalt de com- 
puter al die accoorden, zodat een muziek- 
stuk ontstaat. We kunnen daarbij kiezen of 
we alleen het scherm, alleen het geluid of 
allebei aanzetten. Als de computer met de 
herhaling klaar is, dan kan een volgend 
accoord gekozen worden, dat ook weer 
aan het accoordgeheugen toegevoegd 
wordt. De opdrachten kunnen ook ge- 
woon weer gebruikt worden, inclusief 
HERHAAL zelf. De opdracht START wist 
het accoordgeheugen van het program- 
ma niet uit. Als we dat wel uit willen wis- 
sen, dan moeten we STOP gebruiken en 
daarna het programma opnieuw laten be- 
ginnen. 

Het accoordgeheugen biedt “maar” 
plaats aan 256 accoorden. Als het 256e 
accoord ingevoerd wordt, dan vergeet de 


Fig. 1. Een voorbeeld van een gitaardiagram 


zoals het op het scherm komt te staan. 





computer automatisch de variabelen die 
het accoordgeheugen bijhouden, en hij 


begint weer met accoord nummer 1. 


heel direct weer wat je met de gitaar moet doen. 


Toevoegen van eigengemaakte ac- 


coorden 


We weten nu alles over hoe we het pro- 
gramma moeten gebruiken. Om het pro- 
gramma niet te lang te maken heb ik maar 
een klein aantal accoorden erin opgeno- 
men. Dat is echter eenvoudig uit te brei- 
den. De accoorden zijn opgeslagen in 
DATA-regels. Laten we eens als voor- 
beeld nemen dat we het accoord G6 toe 
willen voegen. Dat is de drieklant van G 
met de zesde toon eraan toegevoegd. Dit 
accoord wordt gespeeld door de eerste 
snaar op de derde fret te drukken en de 
tweede snaar op de tweede fret. De ande- 
re snaren zijn open: ze hoeven alleen maar 
aangeslagen te worden. Dit accoord stop- 


pen we nu als volgt in het programma: 


25240 DATA ”G6”’,3,2,0,0,0,0 

De G moet een hoofdletter zijn. 25240 is 
het eerste regelnummer dat vrij is om 
DATA in te stoppen. 

Een ander voorbeeld: het accoord EM69 
is de mineur drieklank van E met de zesde 
en de negende toon eraan toegevoegd. 
Dit accoord wordt in het programma: 


25250 DATA "”EM69°,0,2,2,0,2,2 

Bij dit accoord zijn de eerste en de vierde 
snaar dus open, de andere snaren worden 
op de tweede fret gedrukt. Zo zijn er nog 
meer dan honderd accoorden die we aan 
het programma zouden kunnen toevoe- 
gen. 


Hoe krijg je de gitaar in je compu- 
ter? 


Het programma GITAAR is in BASICO- 


DE-3 geschreven. Het kan gewoon over- 
getypt worden van de listing op papier. 
Om de werking van het programma te ver- 
duidelijken heb ik REM-regels toege- 
voegd, die bij het intikken gerust weggela- 


ten mogen worden. We moeten daarbij 


niet vergeten de BASICODE-3-routines 
aan het programma toe te voegen. Som- 


mige computers, zoals de Commodore- 


64, moeten eerst klaargezet worden voor 


BASICODE-3 door eerst eenmaal het ver- 


taalprogramma te ‘runnen’. Maar het kan 
veel gemakkelijker. We hebben het pro- 
gramma toegestuurd aan de TROS zodat 
het uitgezonden kan worden via de radio. 
Programma opnemen op cassette 
(woensdags radio 5, 17.40 uur) en met 
behulp van het vertaalprogramma laden… 
klaar. En nu maar gitaarspelen in onze 
vrije tijd… of op school? 


eg rent 
rs a 


997 rem Kk vergeet routines niet !! 4% 5248 tor y= to t-1 


1999 a=199:goto 29:rem gitaar 5278 for z=8 to S:isn(z)=agty,z)inext z 
1919 dim sní5):rem punt op snaar (fret) 5288 if be=1 then gosub 18999:rem diag. 
1923 dim agt255,5)irem accoordgeheugen 5298 if be=i then gosub 11989:rem v.z. 
1938 t=-G:rem teller accoordgeheugen 5399 if ge=3 then 5338 
1948 hp=l/(hgti):rem horiz. grafische punt 5519 gosub 12999: rem speel accoord 
1958 vp=l/tvgti)irem vert. grafische punt 5329 goto 5359 
1959 hm=9.5-5Skhpirem horiz. standaard 5338 sv=Gisp=70: sdes 
1978 vm=9.5-3Skvpirem vert. standaard 5348 gosub 499:rem geen geluid 
1959 dosub 190:rem scherm schoon 5359 next y:irem loop accoorden af 
1999 rem variabelen 5368 goto 3999 
119 rem AANKAN AARAAANANAN ANNA BIP Fen herhaal accoorden úit geheugen 
B PEUT SETAART EPD InG 5389 rem VARAAN NAAIN AKN NAAN HIN KIN 
2818 print "Dit ’ programma bevat” 9978 goto 95 
2850 print accoorden. De compu” PID rem KANNNKINNKIANA AANKAN NAAN KAK 
es Print ter laat ze zien in” 19998 gosub 69S:en=direm graf. scherm 
205 print ‘de vorm van gitaar” 19918 for ve=vm to vmtSikvp step 19%vp 
2868 print "diagrammen, en hij 19928 hoshm:gosub 629:rem plot punt 
2978 print "kan ze ook spelen!” 19838 ho=hmt+@thp 
' 2088 print U kunt zelf een ac-” 18943 gosub 639:rem trek lijn naar punt 
2078 print ‘coord kiezen, of de 19955 next ve:rem horizontale lijnen 
2198 print "eerder gespeelde ac" 19968 ve=vm-vp:gosub 628 
ĳ 2119 print "coorden herhalen. ":print 19878 ho=hm:gosub 634:rem extra lijn 
„ 2129 print Druk op een toets...” | 19988 for x=Sthp to S6thp step 1S%hp 
Kd 2159 gosub 219:rem wacht op toets 19995 ho=hmtx:ve=vmtikvp:gosub 629 
Ì 2148 gosub 199: rem scherm schoon 19199 ve=vm+5Skvp:gosub 639 
2158 print De accoorden kunt ur 19119 next x:irem verticale lijnen 
2164 print "oproepen zoals dat in" 18128 return 
2179 print “Aarde en Kosmos staat” 198139 rem teken gitaardiagram 
2188 print "aangegeven. Door STOP" 19143 rem HAANAAKKAANNHN MINNA KNA N IHN HI 
eig print 'te Eypen I.p.v. een” 11890 for x=8 to 5 
2299 print “accoord, stopt u het” 11919 if sn(x)=255 then 11289 
2219 print „Programma. Door START 11828 if sn(x)>4 then 11178 
2200 Print te typen kunt u terug? 11938 ve=vm-2vp:hoshmt4thptigthpex 
2259 print "naar het begin. Door” 11948 gosub 629 
22348 print "HERHAAL kunt u alle” 11858 ho=ho+2%hp:gosub 639 
Sa Print „pespeelde _ accoordent 11969 ve=vetvpien=l:gosub 62:rem wis 
2269 print "laten herhalen. ":print 11878 ho=ho-2%hp:gosub 639 
2278 print "Druk op een toets..." 11988 ve=vetvp!:gosub 629 
2289 gosub 218:rem wacht op toets 11898 ho=hot2hp:gasub 639 


2299 gosub 198:rem scherm schaan 
2349 print "Moet de muziek aan?” 
2319 gosub 29S:rem kijk naar toets 
2328 if (in=78) or (in=24) then 2349 
2354 goto 23518:rem muziek aan of uit 
2349 if in=74 then mu=stiprint "JA." 
235359 if in=78 then musSiprint "MEE." 
2568 print 

23/8 print "Hoeveel seconden moet” 


d ig vesvetvpiho=ho-hp:gosub 629 
1 
i 
 f 
1 
1 
1 
235839 print "een diagram zichtbaar” À 
i 
1 
i 
1 
1 
1 
1 
1 


118 ho=sho-2%hpien=@ 

128 gosub 624:rem plot 

158 hoz=hot4%hp:gosub &28 

149 ve=vetvp:hosho-hp:gosub 629 
159 ho=ho-2%*hp:gosub 659 

16 goto 11289:rem open rondje 
173 hoshmta%hptiëkhptx 

189 ve=vm-3kvptiëkvpktsn(x):gosub 629 
198 ho=shat2%hp:gosub 639 

29 ve=vetvpiho=shothp:gosub 628 
218 ha=ho-44hp:gosub 6359 

229 ve=vetvp:gosub 629 

238 hoshaot4%hp:gosub 630 

238 ve=vet?2kvp:gosub 629 

258 ho=sha-4%&hp:gosub 634 

1269 ve=vetvpihoshothpigosub 629 
1278 hos=hot2%hoigeosub 4639 

11289 next xirem gesloten rondje 


2398 print "blijven (95-29) 72" 

2495 gosub 299:irem kijk naar toets 

2418 if Cin>47) and (in<51i) then 2439 

24328 goto 2498:rem tiental seconden 

2458 print ins; 

24338 s=1ek(lin-48) 

2459 gosub 289:rem kijk naar toets 

2469 if (s=8) and (in<53) then 2454 
2478 if Cin>47) and (in<58) then 2498 


2488 goto 2459: rem seconden 11904 return 
2499 print in®s”.:print 11399 rem zet vingerzetting in diagram 
krije betere ed nd 5 11318 rem HAANKANRAAAAAAAAK NAAN INNNK 
zalle Dorint „Druk op een toets,” 12090 sdeintts/6):sv=1i5 
2529 print "dan kunnen de accoor-” 12918 sp=52tsn(@):gosub 498: rem geluid 
| 2538 print "den gespeeld worden. 12829 sp=57+tsn(i):gosub 499 
2549 gosub 21G:rem wacht op toets 12938 sp=62tsn(2):gosub 443 
2539 rem tekst en voorbereiding 12540 sp=67+tsn(3):gosub 40 
2544 rem BI AIR AIR RR IK IER RL IA KEEL LES 12850 sp=?1itsn(4):gosub 430 
399 gosub 19S:rem tekstscherm schoon 12968 sp=76tsn(5):gosub 499 
3819 print "Kies accoord "5 (t+1i) 


12978 return 


5929 print "(b.v. C) of een opdracht" 12989 rem speel gebroken het accoord 
ses print 12993 rem KAAK 
5gag input sr$iprint 25905 data "C",3,3,2,8,1,3 

35959 gosub 335Sirem kleine letters groot 25918 data "DES".1.4.3.1.2 

3068 if srs= "START" then 1989 25420 data Dn ne 

3975 if sr$="STOP then Prrg 25034 data RE Shins 

3034 if sr$=" HERHAAL then 5909 25040 data 'E".3.2.2.1.8.0 

3999 restore:rem begin bij eerste data 25959 data "F".1:3:3:2! 1.1 

5199 read ac$:irem lees een accoord 25068 data "GES". 2: 44322 

3119 for x= to Siread snix)inext x 25078 data "GG" 32.600 3 

3129 if ac$="." then 3159:rem onjuist 25004 data "AS*.4.3.1.1.1.4 

3138 if ac$=sr$ then 4999:rem gevonden 25995 data "A",3,4.2.,5 5 8 

5149 goto 3igd:rem lees nieuw accoord 25195 data HRES" 1,13 Í 

3159 print "Dit accoord bestaat” 25118 data "B",2,2,4,4,4, 2 

si69 print "niet:'siprint k 20128 dRER "CH" 3,3, 4,3 

5178 print "Druk op een toets... 25139 data "DESM",9,4,2,1,2,9 

5189 gosub 218:rem wacht op toets 25148 data "DM".1.9.0.2.3.1 

3198 goto 399d:rem onjuiste invoer 25158 data "ESM*,2.1.1.3.4.2 

3298 rem invoer van accoord of opdracht 25168 data "EM".9.2.2 8.0.8 

3218 rem HANK NANNKKA NAAN AK KHAN KKH 25178 data "FM",1,3.3.1 1 1 

4955 gosub 199SS:rem teken diagram 25184 data “GESM",2,4,4,2,2 5 

4918 gosub 11999:rem vingerzetting 25198 data "GM",3,1,9,9,3,3 

4929 if mu=S then 4959 25295 data "ASM",4,2,1,1,4,4 

4959 gosub 12999: rem speel accoord 25219 data "AM",9,4,2,2,1,9 

4948 goto md rem wel geluid 25223 data "BESM",1,1,3,3,2,1 

4059 sv-Gisp=7disdes 25239 data "BM",2,2,4,4,3,2 

4969 gosub 49P:rem geen geluid 29995 data ".",255,255,255,255,255,255 
4979 for x=9 to Srag(t,x)=sntx)inext x 29919 rem data-regels met de accoorden 
4989 tetrtliif t=256 then t=9 29928 rem en de bijbehorende plaatsen 
43098 goto 5999: rem werk geheugen bij 29835 rem (fretten) op de snaren 

4193 rem uitvoering van het accoord 29048 rem 255 is niet aanslaan 

5999 gosub 199:rem scherm schoon 29568 rem KRAAN NNNKRAK ANN NNNK NANA NNAK 





sgig if t>9 then 5999 3995D rem 1999 verplichte regel 


5929 print "Het accoordengeheugen” 30014 rem 1918- variabelen 

dd sdk van de computer ke. 39923 rem 2909- tekst en voorbereiding 
veeg print leeg, dus er kan nie 39959 rem 3999- invoer accoord opdracht 
2459 print herhaald worden.*:print 39943 rem 4999- uitvoering accoord 

2969 print Druk op een toets...” 30053 rem S3GG- herhaling accoorden 
Sese sosub 219:rem wacht op toets 39963 rem 997/G- einde programma 
RAGE 39979 rem 19999- teken gitaardiagram 
„are print Moet het beeld aan: 39989 rem 11999- zet vingerzetting 
sio gosub 209:rem kijk naar toets 39093 rem 12999- speel gebroken accoord 
Siig if (in=78) or (in=74) then 5138 39188 rem 25908- data accoorden 

„129 goto S19P:rem beeld aan of uit 39119 rem 39998- beschrijving prooramna 
ion If An ss then be=liprint „JÂ. o 39129 rem 32909- gegevens aute 

sijg if in=78 then be=9iprint "NEE. Z9133 rem KIKKERR EK 
5159 printiif be=g then ge=ligoto 5259 32038 rem 

5169 print "Moet het geluid aan?" = 32418 rem gitaar 

S178 gosub 29G:rem kijk naar toets - 32025 rem 

„189 if (in=78) or (in=74) then 5299 32838 rem een basicode-3 programma door 
5199 goto 5179:rem geluid aan of uit 32048 rem 

Jae if in=74 then gesliprint CJA." 32958 rem hans van dongen 

5219 if in=78 then ge=@:iprint "NEE. 3206 rem hendrik van veldekestraat 34 
5229 print 32978 rem 6367 sb voerendaal 

5239 print "Druk op een toets..." 32088 rem 

5238 gosub 218:rem wacht op toets 32998 rem tc) 17-12-1986 

3259 gosub 199:rem scherm schoon 32188 rem 
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Rien van Dongen 


VOEDING 





Een os 
en een stier 


Natuurlijk kon Holle Bolle Gijs niet slapen. Van zoveel voedsel 
kan een heel dorp eten! Maar hoeveel at deze veelvraat nu 





eigenlijk’? 
en zeven . 
N (het bij dit artikel behorende computerpro- Bs, 
ton nen bier gramma wordt ook via de radio uitgezonden | pd 
door NOS-Hobbyscoop) &] 
Bi ons dadeliks voedsel gaan: we HeBl 471 5 en en energie, het vet-, eiwit- en koolhydraatge- 
slordig met eenheden om. Ontbijt: een be- Figuur 2. halte bekeken. De energie is aangegeven 
ker melk, een sneetje brood, een klontje in kilojoules per 100 gram en de andere 
boter, een plakje kaas en een appel. In- drie grootheden in grammen per 100 
koop bij de slager: een pond gehakt en Voeding van een dag: gram. (Niet per kilogram omdat de meeste 
twee ons rookvlees graag…. Op deze ma- boeken en tabellen de waarden per 100 
nier is het heel moeilijk om inzicht te krij- är inder enke gram aangeven.) Vitaminen, kalk en ijzer 
gen in wat we zoal eten per dag en juist zijn wel belangrijke voedingsstoffen maar 
daardoor is het misschien wel zo lastig om 1 plak kaas ze spelen geen belangrijke rol bij het vor- 
maat te houden. 4 plakjes metworst men van overgewicht. Daarom worden ze - 
niet meegerekend. 
Figuur 1. tire Met behulp van het programma is het mo- 
; 1 theelepel jam gelijk om op eenvoudige wijze de voe- 
4 kionkiew:böter dingswaarde van een hele dag eten te be- 
palen. Maar hoe weet de computer wat - 
Ee trek aten een plak kaas of een beker melk is? Om 
1 appel dat uit te kunnen rekenen zijn bij elk voe- 
1 kop soep dingsmiddel twee extra getallen aangege- 
ven: de massa van een ‘natuurlijke’ een- $ 
we drildnikarhei re heid en de dichtheid, respectievelijk in kg 
3 aardappelen en in kg per kubieke decimeter. Een ’na- d 
en b prel tuurlijke’ eenheid is bij elk produkt wat : 





Het juiste gebruik van eenheden kun je 
niet afdwingen. Zeker niet door bekeurin- 
gen uit te delen, zoals onlangs nog in een 
klein Limburgs dorp gebeurde. De politie- 
agent had gelijk, in winkels mogen alleen 
de internationaal erkende (SI) eenheden 
gebruikt worden. De verdediging van de 
slager was echter ook niet onredelijk. Er is 
geen klant die om vijfhonderd gram ge- 
hakt vraagt! 

In het onderwijs wordt in het algemeen wèl 
netjes met eenheden omgegaan. Dat zag 
ik ook in les 14 van ’Biologie voor nu en 
straks, 1L’ (uitgeverij Thieme), die over 
voeding gaat. Dat boek bracht me op het 
idee voor een computerprogramma over 
voeding. 

In die les 14 worden afzonderlijke voe- 
dingsstoffen bekeken.en met elkaar ver- 
geleken. De volgende les gaat over de 
‘maaltijdschijf’, een hulpmiddel bij het sa- 
menstellen van een gezonde voeding. 
Geen enkele opdracht gaat over de voe- 
dingswaarde van complete maaltijden. 
Dat is geen wonder, het uitrekenen is met 
de talloze maten en eenheden uit het da- 
gelijks leven, haast onbegonnen werk. 
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1 juslepel jus 


1 schaaltje vla 


Afslanken per computer 


Zware lichamelijke arbeid komt in onze 
samenleving haast niet meer voor. Daar- 
om hebben de meeste mensen aan een 
lichte voeding genoeg. Onze maaltijden 
zijn vaak overdreven uitgebreid en daar- 
naast nemen we ook nog eens allerlei tus- 
sendoortjes zoals koeken (koekjès be- 
staan niet meer), gebak, bonbon’s of 
blokjes kaas. Ook de suiker- of alcohol- 
houdende dranken, limonade, bier en der- 
gelijke dragen flink bij aan de overtollige 
voedingswaarde. 

Hoe beter we weten hoeveel we op een 
dag verorberen des te gemakkelijker is het 
om te matigen. Maar als daarvoor een re- 
kenmachine, een tabel, een kladblok en 
een heleboel tijd nodig zijn, dan zullen we 
de voedingswaarde hoogstens één keer 
uitrekenen. Zonder computer gaat het 
echt heel lastig! 

Het computerprogramma 'Voedings- 
waarde’ is gemaakt om dit probleem op te 
lossen. 


_ Voedingsmiddelen in een tabel 


Om de voedingswaarde van de voeding 
van een dag te berekenen zijn de gege- 
vens van de afzonderlijke produkten no- 
dig. In het programma worden alleen de 


anders: een appel is een vijfde kilogram 


appelen, een snee brood is twee honderd- 


ste kilogram brood en een plakje met 
worst is tien gram van die waar. (Als er 
geen sprake kan zijn van een natuurlijke 
eenheid dan staat in het betreffende vakje 
een nul.) De dichtheid van het voedings- 
middel is nodig om uit een inhoudsmaat 
de massa te kunnen bepalen. Een beker 
melk is twee tiende kubieke decimeter 
melk. Vermenigvuldigd met de dichtheid 
van melk krijgen we de massa. | 

Voor het samenstellen van de lijst met 
voedingsmiddelen zijn diverse bronnen 


gebruikt, biologie-, kook- en tabellenboe- _ 


ken. Waar de boeken elkaar tegenspreken 
is het gemiddelde genomen. Ontbreken- 
de gegevens zijn geschat. Het is heel 


goed mogelijk dat de lijst in het computer- _ 


programma niet geheel correct is. 

Het corrigeren en aanvullen van de lijst is 
een goede opdracht voor de biologieles. 
Andere lezers zullen de scholieren die dit 
uitzoeken heel dankbaar zijn. Aarde en 
Kosmos zal een verbeterde lijst zeker pu- 
bliceren. 


De invoer is geen mooie tabel! - 


Bij het noteren van de dagelijkse voeding 
worden allerlei maten en eenheden ge- 
bruikt. Wil de computer een goede hulp 


zijn dan moet dat apparaat daar zelf wijs 


uit kunnen. Zie figuur 2. Zo’n lijstje bestaat 
uit de volgende categorieën van invoer: * 
®@ Zinnen met slechts een spatie. Hierbij 
gaat het altijd om een aantal stuks van de 
natuurlijke eenheid (3 aardappelen). 


penn” Nd Xe 





Nma ene 


Figuur 3. 
25295 data"pruimen" 
25219 data"tomaat",9.96,9.95,85,9,9, 4 


‚9.94,9.8,396,9,3, 17 


2522 data"tomaten",6.96,98.95,85,0,4, 4 
25238 data"spinazie",9,1,65,9, 1,2 

25243 data"boerenkool" 

25245 data4,9.8,199,6,2.35,2.5 

25259 data"wortels”,9.982,9.95,165,9,9,9 
25269 data"aardappelen” 

25265 datag.1,1.1,499,0, 1,21 

25278 data"brood",9.92,9.5,1612,5,12,78 
25288 data"boterham" 

25285 data8.92,9.5,1612,5,12,78 

25293 data"andijvie",9,8.9,47,8,1.25,1 
25349 data"postelein",9,9.9,49,8.3, 1,1 


®@ Zinnen met twee spaties. Deze catego- 
rie is weer onder te verdelen in: 

o-Een aantal natuurlijke eenheden maar 
nu aangeduid met een woord (4 sneetjes 
brood). 

o -De massa, aangeduid met een getal en 
de eenheid (1 g suiker of 2 ons kaas). 

o -Het volume, ook aangeduid met een 
getal en de eenheid (1 kop soep). 

e Verder zien we nog eenheden en voe- 
dingsmiddelen in enkelvoud en meervoud 
(1 plak, 4 plakjes, 1 appel, 3 aardappelen). 


De eenheden staan ook in een tabel in het 
programma. Zowel bij de voedingsmidde- 
len als bij de eenheden is de meervouds- 
vorm genoteerd. Daardoor is het eenvou- 
diger om enkel- en meervoud als 
hetzelfde te herkennen ('appel’ zit in het 
woord ‘appels’). Als het enkelvoud niet in 
het meervoud zit- moeten beide woorden 
in de tabel geplaatst worden (glas, gla- 
zen). 


Figuur 4. 





Natuurlijke taal interface 


De computer moet in dit programma 'ge- 
wone mensentaal’ verwerken. Het ge- 
deelte van het. programma dat de 
natuurlijke taal omzet in computertaal, 
heet natuurlijke taal interface. Dit pro- 
gramma bestaat bijna geheel uit zo’n in- 
terface. 


Figuur 5. 


Bereken je dagelijkse voedingswaarde. 


Geef op wat je per dag eet. Vermeld bij 
elk voedingsmiddel eerst het aantal 
eenheden, dan de eenheid en daarna het 
voedingsmiddel. 


Zo dus: 2 bekers melk 
108 3 rundvlees 
i.kop soep 


Aardappelen, appels e.d. mag je in 
eenheden maar ook per stuk opgeven. 


Beide goed: 3 aardappelen 
8.25 kg aardappelen 


Siuit elke opgave af met de INUOERtToets. 


Druk op + voor VERDER. 


Voor een betrekkelijk eenvoudig pro- 
bleem is zo’n interface nog wel te maken. 
Het aantal woorden dat bij voeding ge- 
bruikt wordt is niet al te groot. Meestal is 
ons taalgebruik zo ingewikkeld dat com- 
puters er nog niet uitkomen. Soms is het 
zelfs heel onduidelijk: 'Jan zag de vrouw 
met de verrekijker’. Wie van de twee had 
de verrekijker? | 


Figuur 6. 





Ook dit computerprogramma zal nog wel 
uitgebreid moeten worden om elk voe- 
dingslijstje te kunnen verwerken. Een 
mooie opdracht voor de Nederlandse les? 


Als de natuurlijke taal interface woorden 
tegenkomt die niet in de lijst staan dan 
wordt dat aan ons meegedeeld. En om te 
voorkomen dat de computer iets onzin- 
nigs uit gaat zoeken worden de meest 
voor de hand liggende probleempjes met- 
een gesignaleerd. Als er bijvoorbeeld 
géén of meer dan twee spaties in de in- 
voer staan dan is er iets mis. Ook moet de 
waarde van het getal groter dan nul zijn. 
Dat is allemaal goed te kontroleren. 

Een ander probleem is de herkenning van 
hoofdletters. Om een produkt dat via het 
toetsenbord is ingevoerd te kunnen ver- 
gelijken met de voedingsmiddelen uit de 
lijst, moeten de lettersoorten bij elkaar 


passen. Sommige computers geven zon- 


der gebruik van de hoofdlettertoets 
(SHIFT) toch hoofdletters. Ook kan het ge- 
beuren dat de gegevens voor de voe- 
dingsmiddelen in hoofdletters in plaats 
van kleine letters in het programma zijn 
gezet. Zelfs bij opname van de radio kan 
het programma het verkeerde lettertype 
bevatten. (Zie de rubriek RETURN-INFO). 
Ook de karaktertabellen van de diverse 
computers verschillen. In het programma 
is een poging gedaan om de invoer zoda- 
nig te bewerken dat op alle computers 
zonder hoofdlettertoets gewerkt kan wor- 
den. We verwachten een briefje van lezers 
die toch problemen met de invoer heb- 
ben. 


Niet voor handelsdoeleinden 


Matigen met onze voeding is een goede 
zaak. Aan het programma 'Voedings- 
waarde’ kan echter geen medisch advies 
worden ontleend. Hoeveel van een be- 
paalde stof eerf persoon nodig heeft, 
hangt af van de persoon en diens omstan- 
digheden. 

Het kan zelfs gevaarlijk zijn om zonder 
doktersadvies te gaan afslanken. Gebruik 


Figuur 7. 

bestanddeel nodig gegeten 
energie iesee 8432 
vet 42 24 
eiwit 68 S 73 
koolhydraat 368 134 


Hil je doorgaan met opgeven 
wat je gegeten hebt? 


> 


het programma daarom alleen om uw 
voeding te vergelijken met die van ande- 
ren, of om te kijken hoeveel het scheelt als 
u echt overtollige hapjes en drankjes weg- 
laat. 

Misschien bent u wel in staat om het pro- 
gramma medisch verantwoord te maken? 
We wachten uw inzending met spanning 
af! Let echter goed op bij het aanvullen 
van gegevens! In de dataregels moet 
steeds het juiste aantal getallen staan. De 
decimale punt wordt daarbij gemakkelijk 
verward met een komma (zie figuur 3). En 
als er een uitbreiding heeft plaatsgevon- 
den moeten de variabelen, die de aantal- 
len aanduiden in het begin van het pro- 
gramma, ook aangepast worden. Nog een - 
tip tot besluit: Wie vaak achter het toet- 
senbord zit, heeft weinig tijd om te eten! 


99 rem H eerst basicode routines ! #% 
1955 a=1694: goto 28 
1919 rem %% voedingswaarde kad 


1828 dim vwt3)tirem voedingsw. variabele 
1938 dim f£$(5):rem foutstring 

1844 for j=4 to 3:vutjji=dinext j 

1955 rem verschil hoofd- kleine letter 
156% ac=abs(tasct"A")-asct"a")) 

1878 rem staan data in hoofdletters? 
1988 restore:read a$ias=left$t(as, 1) 
1995 ab=dtif asctaf)>rá then ab=i 


1195 rem %% aantallen data in lijst rd 
1118 pi=53ii rem produkten-1 

1128 si=3 trem namen van stuks-1 

115% mi=3 :rem massa eenheden-1 

1148 vi=ióg!rem volume eenheden-1 

115% dim p$(pi);ptpi,5),;s$(si),ms(mi) 
1163 dim m(mi),vBtvi),vtvij 

1175 gasub 184: rem scherm wissen 

1189 print"Even geduld!" 


1295 rem %% 

1218 restore 

1223 for j=S to pi 
1259 read p$(j) 
1248 for k=4 to 5 
1259 read pt(j,k) 
1268 next k 

1274 next j 


lees produkten rd 


135395 rem %% lees stuks KH 
1314 for j=8 to si ; 
1524 read s$(j) 


1558 next j 


14388 rem %% lees massa eenheden Kak 
1418 for j=S to mi 

1428 read mE(j),m(j) 

1454 next j 


1595 rem %% lees volume eenheden %% 
1518 for j=S to vi 

1528 read vs$(j)l,vij) 

15358 next j 


1693 rem %% uitleg NK 
1628 gosub 189: rem scherm wissen 

16358 print" Bereken je sloeg Aniane "jg 
16493 print"voedingswaarde. 

1658 for j=S to 395 print"="s:next j 
1665 print:iprint"Geef op wat je per "5 
1678 print"dag eet. Vermeld bij" 

1688 print"elk voedingsmiddel eerst "5 
1698 print"het aantal" 

1759 print"eenheden, dan de eenheid "5 
1718 print"en daarna het” 

1728 print"voedingsmiddel." 

1758 print 


1748 print"Zo dus: 2 bekers melk" 
1758 print" 195 qg rundvlees" 
1768 print" 1 kop soep" 


1778 print 

1788 print” Aardappelen, appels e.d. "5 
1798 print"mag je in 

1898 print"eenheden maar ook per "5 
1818 print"stuk opgeven." 

1828 print 

1858 print Zo: 
1843 print"of zo: 
1858 print 


3 aardappelen” 
3.25 kg aardappelen” 


Vervolg op blz. 187 
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Dr. W. van Tend 
Siso kode 551.3 


Vloeibare 
telescoop- 
spiegel 








De grote beperking van een vloeibare tele- 
scoopspiegel is, dat hij alleen recht om- 
hoog kan kijken. Door de draaiing van de 
Aarde schuift in de loop van een nacht of 
een jaar een strook van de hemel aan de 
kijker voorbij. Die strook is in de praktijk 
één graad breed. Met een dergelijke 
strook kan toch heel nuttig sterrenkundig 
werk gedaan worden. Op Puerto Rico 
functioneert al enige tientallen jaren de 
radiotelescoop van Arecibo. De schotel 
daarvan rust op de wanden van een kom- 
vormig dal en kan ook niet op een andere 
richting worden ingesteld. Telescopen 
met een vaste kijkrichting zijn heel ge- 
schikt voor statistisch onderzoek. Daarbij 
worden de hemellichamen van een be- 
paalde soort geteld. Vaak doet het er dan 
niet veel toe, welk deel van de hemel 
wordt onderzocht. 


Het voordeel van een grote telescoop met 
een vloeibare spiegel is, dat hij veel goed- 
koper is dan een even grote klassieke 
spiegeltelescoop. Borra schat dat een 
kijker met een vloeibare spiegel van zes 
meter middellijn 200.000 dollar kost. Een 
telescoop met vergelijkbare capaciteiten, 
opgebouwd uit een aantal gewone holle 
spiegels komt op 25 miljoen dollar. 





De strakke sterrensporen geven aan dat de 
roterende spiegel de goede vorm heeft en 
houdt. De kleine onregelmatigheden zijn enkel 
een gevolg van onrust in de aardatmosfeer. 
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TECHNIEK 


Het oppervlak van een roterende vloeistof neemt een holle 
vorm aan. Grote telescopen hebben een spiegel met een hol 
oppervlak. Wie deze twee zaken combineert, heeft de 
roterende-vloeistof-telescoopspiegel bedacht. Velen hebben 
dat al eerder gedaan, maar pas nu heeft iemand het idee echt 
weten te verwezenlijken. Die iemand is Ermanno F. Borra van 
de Université Laval in Quebec, Canada. 


Stilstaande telescoop 


Een bekende proef voor beginnende ama- 
teurastronomen is de volgende. Zet op 
een donkere plaats een camera op een 
statief en richt hem op de sterrenhemel. 
Laat de sluiter een tijdje openstaan. Op de 
film komen dan streepjes doordat de 
draaiing van de Aarde een schijnbare be- 
weging van de sterrenhemel veroorzaakt. 
De Poolster is het vaste punt aan de he- 
mel. Bevindt die zich in het gezichtsveld, 
dan geven de andere sterren op de film 
cirkels daaromheen. Wanneer we sterlicht 
voor langere tijd op één punt van de film 
weten te concentreren, worden ook zwak- 
kere sterren zichtbaar. Bij een gefixeerde 
kijkrichting laten de zwakke sterren geen 
spoor na. 

Ook de vloeibare telescoop met zijn gefi- 
xeerde kijkrichting heeft met deze effec- 
ten te maken. Men kan ze echter ofwel 
tenietdoen, ofwel uitbuiten. Het teniet- 
doen is mogelijk door geen fotografische 
plaat te gebruiken, maar een elektroni- 
sche camera. De verschuiving kan dan 
weggewerkt worden. Het uitbuiten van de 
sporen kan verschillende doelen dienen. 
In de eerste plaats bewijzen scherpe spo- 
ren dat de vloeibare spiegel zijn taak goed 
vervult. Zouden in de draaiing van de spie- 
gel onregelmatigheden optreden, dan 
zouden die in de sporen terug te vinden 
moeten zijn, als verbredingen of als golf- 
jes. In de tweede plaats kan men speuren 
naar korte-termijn-variaties van sterren. 
Zou een bepaalde ster even opvlammen, 
dan zou het spoor van die ster ergens 
verbreed moeten zijn, terwijl de andere 
sporen steeds normaal zijn. Dit is het soort 
onderzoek dat op het ogenblik met de 
vloeibare spiegel gedaan wordt. 

De Université Laval beschikt op het ogen- 
blik over drie prototypes: twee van 1 me- 
ter middellijn en één van 1,65 meter. Borra 
denkt dat een maximale diameter van 30 
meter mogelijk is, vijf maal zo groot als de 
grootste gewone spiegel die zich bevindt 
op de Semirodriki sterrenwacht in de Sov- 
jet-Unie. 


Draaiprobleem opgelost 


Waarschijnlijk heeft Newton ook al aan 


vloeibare spiegels gedacht, toen hij de 
spiegeltelescoop uitvond. Omstreeks 
1800 treffen we een aantal verwijzingen 
aan naar spiegels van roterend kwik. Een 





heel serieuze poging werd in 1909 onder- 
nomen door Robert W. Wood van de 
Johns Hopkins University in Baltimore, 
waar nu het Space Telescope Instituut ge- 
vestigd is. Wood had geen succes. Om de 
goede spiegelvorm te houden, moet de 
draaisnelheid volkomen constant zijn. 
Borra heeft dat nu eindelijk voor elkaar. 

Zijn oplossing voor het draaiprobleem be- 
staat uit een speciaal lager en een specia- 
le drijfriem. De as van de spiegel staat niet 
op de gebruikelijke manier in contact met 
kogels of cilinders, maar wordt op zijn 
plaats gehouden door luchtdruk. Als drij- 
friem gebruikt Borra een stuk band uit een 
audio-cassette. Het materiaal daarvan is 
toevallig heel geschikt, omdat het licht is 
en vanzelf losspringt, wanneer de motor 
zou stoppen. De 1-meter spiegels draaien 
eenmaal per zes seconden rond, waarbij 


„de brandpuntsafstand 4,70meter wordt. - 


Het geheel staat in een zandbak, die trillin- 
gen onderdrukt. 


Spiegel van kwik 


Als spiegelende vloeistof is alleen kwik 
bruikbaar. Kwik is giftig. Het is een van de 
veel besproken zware metalen. Borra: 
“De eerste vraag die iedereen stelt, is dan 
ook: is het niet vreselijk gevaarlijk met een 





De roterende-vloeistof-telescoopspiegel ont- 
worpen door Ermanno F. Borra. 


dergelijke plas kwik te werken? Het valt 
wel mee. Kwik is zwaar en verdampt maar 
langzaam.” De mensen die dichtbij de 
kwikplas werken, hebben laboratorium- 
jassen aan en dragen handschoenen. Als 
ze met het kwik zelf bezig zijn, hebben ze 





een masker voor. Of dezelfde veiigheids- 


maatregelen ook voldoende zijn voor nog 
grotere spiegels, staat te bezien. 

De kwikplas zit in een bak van hout, die is 
omsloten door een metalen hoepel. In de 
toekomst wil Borra een bak gaan gebrui- 
ken van het gelaagde fiberglas waarvan 
ook bootrompen worden gemaakt. Bin- 
nen de houten bak zit een laag van één 
centimeter polyesterhars. Deze heeft men 


al draaiend laten stollen om zo de bedding - 


voor het kwik al vast de goede vorm te 
geven. 

De kwikplas zelf is vijf millimeter dik. Zou 
de kwiklaag ergens dunner worden dan 
drie millimeter, dan zou de plas zich daar 
gaan opsplitsen in losse poeltjes. Zoals 
eenvoudige schoolproefjes al laten zien, 
heeft kwik de neiging losse druppels te 
vormen, terwijl water zich juist over een 
groter oppervlak wil verspreiden. Kleine 
losse kwikbolletjes verdampen naar ver- 
houding snel en geven dus meer giftige 
damp af. 

lets boven de roterende kwikplas zit nog 
een vlak, doorzichtig folie van mylar. De 
dikte hiervan is 0,008 millimeter. Dit folie 


en kwikbak 
Ee 


drukregelaar 










perslucht- ine 


toevoer 


De aandrijving van de roterende kwikbak. Te- 
kening PASP 


voorkomt dat luchtstromingen rimpels in 
de vloeistof veroorzaken. Ondanks het fo- 
lie wordt het kwik toch nog vuil. ledere 
week moet het schoongemaakt worden. 
Kwik is een zware vloeistof en de meeste 
ongerechtigheden komen dan ook vanzelf 
bovendrijven. Dat is vervelend voor een 
spiegel die het van zijn oppervlak moet 
hebben, maar het maakt het schoonma- 
ken wel gemakkelijk. Met een plastic buis- 
je schuift Borra het vuil naar de kant, waar 
hij het afzuigt. 

Op deze manier kan het kwik in de spiegel 
vele maanden mee. Dat is maar goed ook, 
want kwik is duur. De 1-meter spiegel be- 
vat 80 kilo kwik, waarvan de prijs 70 qul- 
den per kilo is. Reken maar eens uit, hoe- 
veel het kwik voor een toekomstige 6- of 
30-meter spiegel gaat kosten. 


Computertekening 


U ziet hierbij de sterrenhemel van 1 maart, 
9 uur ‘s avonds. Een roterende kwikspie- 
gel kan alleen recht omhoog kijken. Hij ziet 
dan het zogenaamde zenit. In de loop van 





drijfriem 









SS luchtlager 


synchrone metor 


Bee driepuntsstandaard 
















wissel 
stroom 


OOST 


1 mie 


de tijd komen alleen de sterren langs de 
ingetekende kring door dat punt voorbij. 
Op dit moment staat de heldere ster Ca- 
pella in het sterrenbeeld Voerman tamelijk 
dicht bij het zenit. Andere sterrenbeelden 
die recht overkomen, zijn de Grote Beer 
(nu stijgend in het noordoosten) en het 
W-vormige sterrenbeeld Cassiopeia (nu 
dalend in het noordwesten). Tussen Cas- 
siopeia en de Voerman staat Perseus. 
De ingetekende kring vormt een breedte- 
cirkel rondom de Poolster. Breedte wordt 
bij sterren declinatie genoemd. De Pool- 
ster heeft een declinatie van +90 graden; 
de declinatie van het zenit is gelijk aan 
onze geografische breedte op Aarde. 
Voor Nederland is dat dus ongeveer 52 
graden. Gaan we dichter naar de evenaar 
toe, dan komt een langere strook van de 
hemel met grotere snelheid door het zenit. 
Deze tekening is gemaakt met behulp van 
het sterrenkaartprogramma van Jan Bre- 
denbeek op de Basicode-3 voorbeeld- 
cassette. Hierin zijn de volgende wijzigin- 
gen aangebracht om de declinatiecirkel te 
tekenen: 
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CONVERTIBLE ROOF 

INFLATABLE AIRBAGS CTO OPEN AD LOSE ROOP 
F CURVATURE CF MIRROR 

WIND DEFLEXOR 

ENIS : 

CORRUGAJED IRON SILO 

PRIME FOCUS 

MIRROR 

DRIVE MOTOR 








Zo stelt Borra zich een toekomstige sterren- 
wacht voor rondom een roterende kwikspiegel. 


Zn 


Ervaren mensen kunnen deze wijzigingen 
eenvoudig aanbrengen via kopiëren en 
aanpassen van de regels 1880-2020. Wie 
verstand heeft van de hemelbol, kan na- 
gaan dat deze methode van tekenen al- 
leen werkt ten noorden van 45 graden 
noorderbreedte. 


2088 CN=Q 

2098 FORI=@ TO 368 STEP 2 

2108 D1=BXP1/180 

2118 HA=LS-IXP1/188:SD=SINCD1):CD=COSCDIJ 
2128 IFHA<@ THENHA=HA+2XPI 

2138 CZ=SBXSD+CBXCDXCOS(HA) 

2148 IFCZ2<=8 THEN2230 

2158 REM BOVEN HORIZON 

2168 ZI=P1/2-ATNCCZ/SQR(1-CAKCZI) :Z=Z1X. I/P] 
2178 X=ZKCDKSINCHAJSSINCZIJ 

2188 Y=SQRCABSCAHKZ-KKX) ) 

2190 IFSD>SBXCZ THENY=-Y 

2208 HOEXK. 75+. 5:VE=Y+. 5 

2218 IF I=8 THEN GOSUB628 

2228 IF I<>8@ THEN GOSUB630 

2230 NEXT I 

2408 SR$="DD"iHO=., I:VE=, 59 :CN=0 : GOSUBESO 
2598 GOSUB218:GOSUB190:GOTO1 330 
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nn ME nt rn a 


Dr. W. van Tend 


Betere diameter 


voor Pluto 


Pluto werd ontdekt in 1930. Men schatte 
de diameter destijds op 6000 kilometer. 
De grootte kon alleen bepaald worden via 
de vraag "hoe groot is een lichaam dat 
deze hoeveelheid zonlicht terugkaatst?” 
Langs deze weg kwam men tien jaar gele- 
den op een middellijn van 3000 kilometer. 
In 1978 werd ontdekt dat Pluto niet alleen 
was, maar een maan bij zich had. Al gauw 
bedacht men dat op het einde van de jaren 
tachtig Pluto, de nieuw ontdekte maan 
Charon en de Aarde voor langere tijd in 
hetzelfde vlak zouden staan. Charon en 
Pluto zouden elkaar beurtelings afdekken. 
Uit de duur van de verduisteringen kan 
hun grootte worden berekend. In het voor- 
jaar van 1986 is de meting voor het eerst 
feitelijk uitgevoerd. De onzekerheid in de 
bepaling is nu nog slechts 140 kilometer. 
Uit de omlooptijd van Pluto en Charon om 
elkaar (6 uur) en hun onderlinge afstand 
(19400 kilometer) volgt, dat ze samen een 
massa moeten hebben van een kwart pro- 
cent van de aardmassa. Als beide uit het- 
zelfde materiaal bestaan, heeft Pluto 
daarvan 87 procent en Charon 13 pro- 
cent. Bij de Aarde heeft de planeet 99 
procent en de Maan 1 procent. Bij de an- 
dere planeten valt deze verhouding nog 
meer in het nadeel van de manen uit. Van- 
wege het relatief grote aandeel van de 
Maan werd het Aarde-Maan-stelsel al een 
dubbelplaneet genoemd. Pluto en Charon 
blijken nu nog meer recht te hebben op die 
benaming. 

Voor de oorsprong van het Plutostelsel 
zijn twee mogelijkheden. Het kan gaan om 
komeetkernen ingevangen door het zon- 
nestelsel of om manen losgeraakt van de 
planeet Neptunus. Het stelsel van de ma- 
nen bij die planeet ziet er verstoord uit. De 
passage van een hemellichaam van onge- 
veer vier aardmassa's zou een maan heb- 
ben kunnen laten ontsnappen naar de 
Plutobaan. In dit geval zou de maan door 
getijdenkrachten kapot getrokken kunnen 
zijn tot de afzonderlijke hemellichamen 


Figuur 1. Pluto en Charon op dezelfde schaal. 
De tussenafstand is tien maal extra verkleind. 
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ASTRONOMIE 


Metingen, gedaan op de Europese zuidelijke Sterrenwacht in 
Chili, hebben een nieuwe waarde opgeleverd voor de 


middellijn van de planeet Pluto. Pluto zelf is 2200 kilometer in 
diameter, 17 procent van de middellijn van de Aarde. Voor 


Pluto’s begeleider Charon kwam men uit op 1160 kilometer. 
Het Plutostelsel kan bij deze verhoudingen met recht een 
dubbelplaneet worden genoemd. 


Pluto en Charon. 

De nieuwe gegevens pleiten voor dit sce- 
nario en tegen komeetkernen. De laatsten 
hebben een soortelijk gewicht dat kleiner 
is dan de waarde van 2, die men nu nauw- 
keurig heeft kunnen vaststellen voor het 
Plutostelsel. 


Figuur 2. Nu we de verhouding van Pluto en 
Charon kennen, verliezen de Aarde en de Maan 
een groot deel van hun aanspraak op de bena- 
ming dubbelplaneet. 


98% 2 


Of 


Basicode-3 programma voor het tekenen van 
een planeet met maan. Dit programma kan ook 
werken op IBM-PC/MS-DOS machines, met 
dezelfde aanpassingen als bij andere program- 
ma's uit dit tijdschrift. 

v 


1098 A=200:GOTOZ2O:REM dubbelplaneet 

1018 P1=3.14159265358S:REM pi 

1020 R=P1/180:REM radialen/graad 

1038 PRINT 

1848 PRINT"Dit programma kan een planeet” 
1858 PRINT"en een maan op schaal" 

1968 PRINT"tekenen. Het geeft ook de” 
1878 PRINT"verhouding van de massa’s, 'f 
1088 PRINT 

1038 PRINT"Mogelijke invoer:" 


1189 PRINT"aarde/maan: 12757, 3476, 384409" 
1118 PRINT"pluto/charon: 2209, 1169, 19629" 


1120 PRINT 

1138 PRINT"middellijn planeet "5 
1148 INPUTMP 

1158 RP=MP/2Z:REM straal planeet 
1168 PRINT"middellijn maan "53 
1128 INPUTMM 

1188 RM=MM/2:REM straal maan 
1198 PRINT"onderlinge afstand "5; 
1208 INPUTAA 

1218 SF=RP+AA+RM 

1228 SF=.9/SF:REM schaalfactor 
1238 GOSUB620:CN=BE:REM grafisch 
1240 REM 

1258 REM teken planeet 

1260 REM 

1278 FORHK=@ TO368 STEP12 

1288 VE=.S-SINCHKXRIJXSFXRPX4/3 
12398 HO=.B5+C1+COSCHKXR) JXSFXRP 
13908 IFHK=@ THENGOSUB622:REM punt 
1318 GOSUBS63B:REM. lijntje 

1320 NEXTHK 

1330 REM 

1340 REM teken maan 

13509 REM 

1369 FORHK=@ TO360 STEP1O 

1378 VE=.5-SINCHKXRIJXSFXRMK4/3 
1388 HO=. 95+CCOSCHKXRI-1 )XSFXRM 
1338 IFHK=@ THENGOSUB620 

14909 GOSUB639 

1418 NEXTHK 

1420 PM=RP“3:REM massa planeet 
1438 LM=RM*3:REM massa maan 
1440 TM=PM+LM:REM tqkale massa 


1458 PF=PM/TMX1OO:REM % planeet 


1460 LF=LM/TMXIGBE:REM % maan 
1470 SR=PF :CT=3:CN=0 

1488 GOSUB3IO:REM 3 cijfers 

1430 SRE=SRE+" A" EREM schermtekst 
1588 HO=.25:VE=. 8 :GOSUBE6SO 

FS10r SRSLF :CT ER SCN=E 





1528 GOSUB3ID:REM 3 cijfers 

1538 SRE-SREH" LG" :IREM schermtekst 
1548 HO=. 25 :VE=. 8: GOSUB6SQ 

1558 GOSUB2IG:REM wacht op toets 
15960. GOTOI9SB:EREM stop 

32000 REM 
32818 REM dit is een 

32020 REM Basicode-3 programma 
32030 REM wan 

32040 REM 








Figuur 3. Hier zijn acht stadia weergegeven van 
de bedekking van het ene hemellichaam door 
het andere. Wanneer Charon achter Pluto ver- 
dwijnt, wordt dit echter zo niet waargenomen. 
Dit tweetal staat veel te ver weg. Men kan de 
schijfjes zelfs met grote teleskopen niet onder- 
scheiden. 







































































































































































Figuur 4. Het enige dat men van het Puto-Cha- 
ron-stelsel kan meten, is de totale hoeveelheid 
licht afkomstig van beide leden samen. Bij een 
verduistering rijgen we in het geheel minder 
licht binnen. De grafiek van de hoeveelheid 
licht, uitgezet tegen de tijd, heet de lichtkrom- 
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Figuur 5. Wanneer het ene hemellichaam dui- 
delijk kleiner is dan het andere, houdt het mini- 
mum in de lichtkromme langere tijd aan. De 
hele tijd dat het maantje zich in zijn geheel 
achter de planeetschijf bevindt, verandert er 
niets. 

Stel dat het maantje en de planeet dezelfde 
egale helderheid hebben. Uit de diepte van de 
verduistering valt dan de grootteverhouding 
van de twee schijfjes af te lezen. Ook de duur 
van de verschillende stadia geeft informatie 
over de afmetingen, mits de baanbeweging be- 
kend is. 
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Figuur 6. Bij gelijk egale schijfjes maakt het niet 
uit of het maantje voor of achter de planeet 
langsgaat. De lichtkromme is hetzelfde. 
Wanneer de twee verduisteringen niet gelijk 
zijn, valt uit het verschil informatie te halen over 
het oppervlak van de twee hemellichamen. Een 
complicatie kan zijn dat het voorste hemelli- 
chaam een schaduw werpt op het achterste. 
Al met al bevat de lichtkromme een schat aan 
informatie over de grootte, het oppervlak en de 
baan van planeet en maantje. De lichtkromme 
is ook de sleutel voor het onderzoek van dub- 
belsterren die elkaar om de beurt bedekken. 
Sterren geven zelf licht en schaduwwerking 
speelt daar dus geen rol. Bij sterren kan de 
grote partner lichtzwak zijn en de kleine partner 
heel helder. Er is dan een diepe en een ondiepe 
verduistering. Sterren zijn in het algemeen in 
het midden merkbaar helderder dan aan de 
randen. De mate waarin is af te leiden uit de 
begin- en eindstadia van de bedekking. 

Het kost doorgaans nogal wat moeite om de 
lichtkromme te bemachtigen. De interessante 
objecten staan ver weg en we krijgen er maar 
weinig licht van. De lichtkromme die bij een 
bedekking wordt geregistreerd, ziet er dan zo 
uit: 
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Figuur 7. leder sterretje geeft een opgevangen 
lichtdeeltje aan. De aantallen zijn klein en de 
toevallige fluctuaties zijn daardoor groot. Als 
we grotere aantallen lichtdeeltjes weten te be- 
machtigen, worden de fluctuaties kleiner. We 
kunnen bijvoorbeeld over langere tijden de 
lichtdeeltjes stapelen. We splitsen de bedek- 
king dan in minder stadia op. Dan worden som- 
mige details in de lichtkromme ook weer weg- 
gevaagd. Wat we in de hoogte winnen, 
verliezen we in de breedte. De wet van behoud 
van ellende is nu eenmaal de belangrijkste na- 
tuurwet. 

Werkelijke verbetering ontstaat wanneer we 
vele gelijke verduisteringen registreren. Het ge- 
middelde komt er dan zo uit te zien: 


x x 

x x x 

x * xx xX 

XX x xx x 
OE x XK OK KKK 
X KKK % XK XK XK KKX 
KKKKK MX XK RRT Ke MKK 
KKKKK MK KK Ne MHR KK 


KKKKK MK KKK 
KKKKK KA KKK 


XK HKKKK HKH 
x KKKKKKKK KKK 
KAKKK NKK x HAAK KKK KKK KKK 
KKK K KNK KKK KKK KK 
MAAAR KK AK AK ARK 
KAASAKKKKK KOK AK KK AKK K 
KAAAAKKKKNK KAK AK AK ARK 
HAAK AKK ARK 
AKK AKKKKOKKK 
AKK KKK KK 
AOK 
HAAK KKKOOKK 
ROKR 
ARR KKK KKK 
KKK 
KKK KKK KKK KKK K 


De MEE HM 


HH HRH H 
HH HHH H 
HHH al 
HHR 
HR H 
= HRH 


# HH 
HH 
HH 
HR 
gemiddelde na 20 keer 
toets voor verder> 
Figuur 8. Hier zijn twintig bedekkingen opgeno- 
men. Willen we de hobbels in de lichtkromme 
nog tweemaal zo klein maken, dan moeten we 
vier maal zoveel metingen doen, dus maar liefst 
tachtig verduisteringen volgen. Het baanvlak 
van de hemellichamen kan inmiddels zo ver- 
anderd zijn, dat de verduisteringen niet meer 
identiek zijn. Het waarneemseizoen voor het 
onderzoeksobject kan aflopen, omdat de Zon 
in het betreffende deel van de hemel komt te 
staan. 
Meestal echter wordt de meetreeks door men- 
selijke redenen beëindigd. Het geduld of het 
geld is op. De waarneemtijd is beperkt omdat 
ook andere onderzoekers de kijker willen ge- 
bruiken. De lichtkromme is dan meestal nog net 
niet goed genoeg om de werkelijk interessante 
dingen te kunnen afleiden. 
Van sterren, planeten of manen krijgen we op 
onregelmatige tijden lichtdeeltjes binnen. Een 
computerprogramma kan alleen ín een regel- 
matig tempo werken. Daarom de volgende 
truc, die overigens lijkt op de werkwijze in het 
programma radio-actief-verval van E. Ivens. 
We nemen een rechthoekje aan de hemel. 
Overeenkomstig het stadium van de verduiste- 
ring geven we de schijfjes van de twee hemelli- 
chamen hierin hun plaats. Via toevalsgetallen 
kiezen we in het rechthoekje een punt. Ligt dat 
punt binnen een van de schijfjes, dan laten we 
één lichtdeeltje binnenkomen. Ligt het punt 
buiten de schijfjes, dan gebeurt er deze keer 
niets. In ieder stadium herhalen we dit hetzelfde 
aantal malen. De hoeveelheid licht die in een 
bepaald stadium van de bedekking binnen- 
komt, is evenredig met wat er in dat stadium 
aan schijfoppervlak zichtbaar is (afgezien van 
de fluctuaties). 


Het aantal toevalspunten per stadium is in de 
praktijk ongeveer honderd. De maximaal opge- 
vangen hoeveelheid licht past dan meestal nog 
op het scherm. Dit programma is in Basicode- 
2. Het kan op de gebruikelijke manier ook op 
IBM-PC/MS-DOS machines worden gedraaid. 


Bezitters van MSX-computers met een MSX- 
plotter kunnen de tekening ook op papier krij- 


gen via een aantal wijzigingen in de Basicode- 


voorloper. 


628 SCREEN2:LPRINT CHR$(22)+"#":LPRINT "S2":RETURN 
628 GOSUBE6SS:PSETCOH, OU), O 


622 LPRINT "M";HOXS340;", " ;-VEX7OS5 

624 RETURN 

638 GOSUBS655:LINE-COH, OU), O 

632 LPRINT “D";HOX948;", " ;-VEXZO5 

634 RETURN 

658 GOSUBS6S5:COLORO:0=1:LPRINT "M";HOX94B;", ";-VEKZOS5 


:LPRINT "P"+SR$ 

651 IFO>LENCSR$)OROHÒ 229THENCOLOR15 : RETURN 

652 DRAW" BM=OH;, =0U 5" :PRINT#1,MID$SCSR$,O, 1) :0OH=0OH+6 :0 
=0+1 :GOTO6S1 

655 OH=HOX192+30 : IFOH<3BOROH> 221 THENOH=30-1S1XCOH> 90) 


656 OV=VEX192: IFOU<BOROUD 191 THENOU=-1S1XCOUD 90) 
657 O=15-CNX14:RETURN 


bedekking pluto/charon 


1290 A=200:GOTO2O:REM verduistering 
1919 P1=3.14159265358I:REM pi 

1028 PRINT 

1832 PRINT"Dit programma bootst 

1048 PRINT"bedekk ingen na van het ene 
1852 PRINT"hemellichaam door het andere" 
1068 PRINT" CPluto door Charon,” 

1079 PRINT"dubbelsterren). Van beide" 
10809 PRINT"partners is het oppervlak” 
12098 PRINT'"even helder. We zien” 

1122 PRINT'"de hoeveelheid licht gemeten” 
1112 PRINT" in de opeenvolgende fasen van” 
1129 PRINT"de verduistering als kolommen” 
1138 PRINT"op het scherm komen. De” 
1140 PRINT"afzonderlijke metingen bevatten” 
1158 PRINT '"mogal wät- storingen het 
11609 PRINT'gemiddelde na veel verduistering 
en 

11722 PRINT'"wordt het verloop pas" 
11808 PRINT"goed duidelijk." 

11939 PRINT 

1208 PRINT" invoer voor de beste" 

1210 PRINT 'vérduistering Meteen 
12208 PRINT 

1230 PRINT"middellijn planeet “5 

12408 INPUTMP 

1250 RP=MP/Z2:REM straal planeet 

1260 PKERP“Z2E:EREM straal kwadraat 
1248 RRINT "middellijn maen 

12808 INPUTMM 

1290 RM=MM/Z2E:REM straal maan 

1300 MKERM ZE:EREM straal kwadraat 
1319 HG=EMP+MM:EREM hoogte hemelvlak 
1320 BR=HG+MME:REM breedte hemelvlak 
1330 REM 

1340 REM maximale passage-afstand 
1359 REM 

1350 SR=RP+RM: GOSUB300 

1370 PRIÌINT"passage-afstand "5 

1380- PRINT "COS TPSREFL) EK 

13398 INPUTAA 

1400 REM 

14108 REM oppervlakken 

1420 REM 

1439 BI=PIXCPK+MKJEREM planeet +maan 
1440 TL=BRXHGEREM hele hemelvlak 
1459 HM=38:UM=23:REM schermgrootte 
1460 REM 

14/8 REM aantal schoten vanuit hele 
1480 REM hemelvlak 

14390 REM 

1509 TK=TL/BIXUMX. 9 

1510 DIMSMCHM)EREM voor gemiddelde 
1520 KR=IE:REM eerste keer 

1539 REM 

1548 REM vertikale plaats 

1559 REM 

15609 YP=HG-RPE:REM planeet 

1570 YM=YP-AA:REM maan 

1580 XP=BR/2:REM horizontaal planeet 
1592 GOSUBIOD:REM scherm schoon 

16008 REM 

1619 REM laat de maan langs 

16208 REM de hemel lopen. 

1630 REM neem steeds een kolom 

1640 REM lieht op (op tmeit scherm 

1658 REM 

1658 FORHO=8 TOHM 

1678 REM 

1688 REM horizontale plaats maan 
1690 REM 

1784 XMERM+HOXHGZHM 

1718 REM 

1720. REM stapel lichtt vanaf 

1230 REM onderkant scherm 


Q 
BREM. Giur shotten an 
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17808 REM wvanaf de hemel 

1730 REM 

1808 FORKS=1 TOTK 

1818 GOSUB260:REM toevalsgetal 
1820 XI=RUXBREREM hemekpositie 
18308 REM 

18409 GOSUB260 
1850 YI=RUKHGIREM vertikaal 


horizontaal 


1870 REM afstand kwadraat tot 
1888 REM middelpunt 

1830 REM 

19008 P2=CXI-XPI"2+(Y1-YP)2E:REM 
1918 M2=ECX1 XM)“ 2+CY1-YMIS2:REM 
139208 REM 

1930 REM binnen. 





planeet 
maan 


13940 REM 

1950 IFP2<PK THENIS80:REM planeet? -+ 
13968 IFM2<MK THENISSO:REM of maan? —! 
19/0 GOTO2020O:REM duister hemelpunt 
1984 GOSUBIIVEREN stapel 1 eht erheen 
159350 PRINT TL 

2000 VE=VE-I:REM hoog stapel op 

2018 IFVE<@ THENKS=TK+IE:REM top scherm 
2020 NEXTKS:REM volgende schot 

2030 IFKR>1 THEN2060 

2048 SMCHOJ=VEIEREM bewaar 

2059 GOTOZ2070 

2050 SMCHOJ=SMCHOI+HVEFIEREM tel bij 
2079 NEXTHO:REM volgende positie maan 
20808 REM = volgende lichtkolom 
2038 GOSUBIGO:REM scherm schoon 


2108 REM 

2118 REM teken grafiek gemiddelde 
2128 REM tot nu toe 

2130 REM 

2148 FORHO=@ TOHM 

2158 VE=SMCHOI/KR 

21608 GOSUB110 

ZEP ER INT EAS 

2188 NEXTHO 

21398 HO=B:VE=UM-3 :GOSUB1 18 

2208 PRINT" gemiddelde na'";KRs"keer" 
2218 PRINT" toets voor verder>"; 
2228 GOSUB21O:REM wacht op toets 
2238 GOSUBIOO:REM scherm schoon 
2240 KREKR+IEREM volgende verduistering 
2250 GOTO1660 











EEN EIGEN BEDRIJF BEGINNEN 
KUN JE OOK MET 2 KRUKKEN 


AVO-NEDERLAND bemiddelt bij 
en zoekt werk voor mensen met 
een handicap. Reeds 60 jaar. 


Jaarlijks kunnen vele 


gehandicapten zich via AVO- 
NEDERLAND maatschappelijk 
ontplooien. Bij een bedrijf of als 
startende ondernemer. AVO- 
Nederland maakt nog meer 
mogelijk: opleidingen, vorming, 
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beschermvrouwe 
HM de Koningin 


recreatie, aanpassingen. Want 
AVO-NEDERLAND helpt, zoveel 
als de middelen toelaten, waar 


wettelijke voorzieningen èchtte 


kort schieten. Voor iedere 
gehandicapte! Dankzij het 
landelijk buro, regionale 
consulenten, afdelingen en zo’n 
20.000 vrijwilligers rondom onze 





antwoordnr. 201, 3800 VB Amersfoort 
Tel.:033-63 52 14 
giro 625.000 


| Vraag inlichtingen STEUN ONS WERK 














print"Sluit elke opgave af met 
print”"de INVOERtoets. " 


print"bestanddeel 
grint” 
print"energie 


149198 
13929 


rem verder-toets 14559 
gosub 1999: rem verder-toets 14335 
rem %% lus voor aanvulling En nd ded 
for av=d ta 14195 
rem #% voeding van een dag RLIALIG 


far dg=8 to 1 

gosub 1199: rem invoer 
dg=giif af=".," then dg=i 
rem bereken voedingswaarde 
if dg=g then gosub 12999 


next dg 

rem #%& druk voedingswaarde af %% 
ct=8ichn=direm stel getalafdruk in 
gosub 199:rem scherm wissen 


nadig gegeten” 


19998 "5 
sSr=Vvw(g):;gosub3iSiprint ee print 
42 


orint!vet 

sr=vw(i):;gosub3iSiprint srs: print 
print"eiwit eg "ss 
sr=vw(2):gosubsig: print sr®: print 
print"koolhydraat 
sr=vw(3)igosubsiSiprint sr$:print 


568 


Pen veemeeenuneaeraenmmenmmmaanr 
rem #% vraag voor doorgaan Kk 


print 
print"Wil je doorgaan met opgeven" 14568 


13128 
13159 
13145 
14175 
14185 
14195 
14299 
14219 
149229 
14259 
"13249 
14258 
14268 
149279 
14288 
14299 
14595 
14519 
14529 
14559 
143545 
14555 


5058 print"wat je gegeten hebt?” 14575 
54 print 143589 
5858 input a® 143599 
ged if af<>"" then af=leftst(as, 1) 14359 
348 av=sliiftas="J")ortas="j")then av=S 14419 
Sg next av 14429 
PIFP ONTIFEMT- eee 1443595 
19553 rem KH verder-toets NR 1444 
19SIS hoed: ve=23 14455 
19915 gosub 119:rem zet cursor op ho,ve 14468 
19928 print"Druk op + voor VERDER. "5 1449 
19958 for vt=8 to 1 14555 
1994 gosub 219:rem vraag toets 14515 
195 vteStif ins="+" then vt=i 14528 
i9S6S next vt 145359 
19979 returnirem-------=--=——— 13535 
11995 rem H% invoer %% 1455I 
11919 for w=d to 1 14595 
11915 a$="" 14655 
11929 gosub 199: rem scherm wissen 14618 
11925 print"Typ eerst het getal, "5 14628 
11959 print" (eventueel) de * 146358 
11955 print"eenheid en dan het "5 146435 
11943 print"voedingsmiddel.” 1465 
11945 print"Vergeet de spaties niet!" 14795 
11958 print"Stoppen? Typ dan een punt!” 14718 
11955 printiinput as 14723 
11949 print:print "Even geduld!" 14758 
11965 wedliif af=".," then wei 14748 
11979 iftlas<>"")and(tw=d)then gosubiiisg 14758 
11975 next w 14748 
11999 returnirem------==—=mmmmmmm 14775 
11199 rem eerste antwoord kontrole 14789 
iilië be=""isp=g 14799 
11129 for a=l to lenta) 14893 
i1159 as=asc{tmid(a%,a, 1)) 14819 
11149 if as=32tac then as=32 14828 
11159 if as=352 then sp=spti 14859 
11169 if ab=l then gosub 1159:rem hoog 14849 
11179 if ab=@ then gosub 1149S:rem laag 14899 
11188 b$=bStchr$(as) 18998 
11199 next a 18818 
11299 wei if (sp=ijlortsp=2) then wei 18829 
11219 rem foutmelding 18854 
11229 if sp=9 then ft=@S:gosubisggg 1839435 
11258 if sp>2 then ft=1i:gosubisgss 18959 
11248 returnirem--------—……—m 18495 
11399 rem #% haag W 19995 
11519 if(as<7l)land(as>64)then aszastac 19919 
11399 returnirem------=---——— 19828 
113993 rem #% laag KX 19950 
11418 if (as>9I4)then aszas-ac 198435 
11499 returnirem-------==-=—— 19558 
129958 rem #%# bereken voedingswaarde #4 19465 
12919 rem splits invoer 19878 
12928 gosub 12199 19899 
[29359 rem foutmelding 25998 
12948 if gt<=g then ft=2:gosubi8ggg 2581 
12858 rem bepaal de waarde 25828 
12968 if gt>g then gosub 135998 259358 
12899 returnirem--------==vmmmm 259355 
12193 rem %% splits invoer A 25940 
12119 p=S:;gts=""Gehs=""i vmf="" 25058 
12129 far j=i to len (b$) 25065 
121359 c$=mid(b5,j,1) 25978 
121498 if c$=" " then p=ptitc$="" 25eg 
12158 if p=S then gts=gtftc$ 2548 
12168 if (sp=i)landt(p=ijthen vm$=vm$tct 25199 
12178 if (sp=2land(p=ijthen eh$=zehstc$ 25119 
12188 if p=2 then vm$=vmstc$ 2119 
12198 next j 25129 
12195 eezlenteh$):vv=len (vm) BAE 
12299 rem waarde van getalstring 23159 
12218 gt=valtgts) 25144 
12299 return:rem--====——…m—mmmmemm 251435 
15998 rem 4% bepaal de waarde % 25159 
13818 rem bepaal voesingeniddel 25168 
15928 v=-1igosub 15199 235179 
138358 rem foutmelding 25189 
135949 if v=-1l then ft=3:gosub 189998 2518 
13958 rem berekening 25239 
15968 if vè-1l then 14909 25219 
13998 return:rem---------—--ne 25229 
135198 rem %% bepaal voedingsmiddel #% 25239 
13118 for j=8 to pi 25248 
13124 a$=p${(j) 25245 
13139 aa=len{(as) 25258 
13148 if vv<aa then af=lefts(as, vv) 25269 
13158 if- vm$=as then v=i:j=pi 25265 
13168 next j 25279 
13199 return:irem-------==mmemm 25288 
14954 ven Ht berekening * 25285 


rem bereken per stuk 

if sp=i then gosub 19199 
rem bereken per eenheid 
if sp=2 then gosub 14299 


25295 
25509 
25519 
25529 


peturniesm en mreesnesesnennns 25334 
rem %% bereken per stuk HN 25335 
ma=gtptv, 0) #19 25340 
for j=8 to 5 25350 
vwij)=vwtjltmakpiv, jt+2) 25355 
next 2556 


rem foutmelding 

if plv‚,9)=S then ft=4:gosubis8ggg Rae 
geraensrenm eeen 2539 
rem #% bereken per eenheid HN oma 
rem bereken stuks 25418 
gv=g:igosub 14599 25420 


rem bereken per massa 25430 
if gv=8 then gosub 14599 25448 
rem bereken per volume 25450 
if gv=g then gosub 14799 2546 
rem foutmelding 25470 
if gv=S then ft=5S:gosub 18999 254830 
peturnsreme sneven essen 2548 


rem #% bereken stuks A55 
for j=3 to si 25518 
as=s$(j) 25520 
aa=len (as) 25530 
if ee{aa then aS=lefts(as,ee) 25548 
if a$s=eh$ then gv=liij=si 25558 
next j 25568 
rem per stuk 25578 
if qv=i then gosub 14499 25580 
Pe turniren eneen 255 
rem #% per stuk HANDSET 
ma=gtptv, kig 25618 
for j=8 to 5 25624 
vwlj)=vwtlj) tmakptv,jt2) 25638 
next j 25648 
rem foutmelding 25654 
if ptlv‚,9)=S then ft=4:gosubi89ds psseg 
returnsfem ennn 30005 
rem %% bereken per massa N31 
tor j=8 to mi 30028 
if m$(j)=ehs then gv=liieh=m(j) 30030 
next j 35343 
rem per massa 

if gv=el then gosub 14699 ln 
ve rurasrenmsn ennn 

rem %% per massa %X 
ma=gttehtig 

for j=9 to 5 

VWwtj)=vwlj) tmakpiv,j+t2) 

next j 

Peuren ereen 

rem %% bereken per volume KX 

tor j=S to vi 

ab=v$(j) 


aa=len (as) 

if ee{aa then a$=left$(as,ee) 

if a$=eh% then gv=iieh=v(jjij=vi 
next j 

rem per volume 

if gv=l then gosub 14899 
geuren neen eenen 


rem %% per volume Ed 
ma=gttehkptv, 1) #19 

tar jeg to 3 

vwlj)=vwtj) tmakptv,jt2) 

next j 

verurn rem neseanemeee 
rem %% foutmelding %% 


gosub 258:rem piep 

gosub 19999: rem fout teksten 
print:iprint"PROBEER HET MOG EENS" 
oriNtiDerint PRAPEIE 'T 

gosub 19999: rem verder-toets 
returnsrem eva teesnsennan en 
rem %% fout teksten 
fs(G)=" geen spaties gevonden” 
$$(i)j="er staan teveel spaties” 
$E(2)="dit levert niets op” 
FES) =vmbt" staat niet in lijst" 
if eht$="" then eh$="stuk”" 
fE(4)=vm$t" gaat niet per "teh$ 
fE(S)=sentt" staat niet in lijst” 
rerurniren essensnnnnnenenmmns 
rem voedingsmiddelen 

rem eerst de massa van de 

rem natuurlijke eenheid in Kg 

rem bijv. bij een appel &.2 

rem dan de dichtheid in ka/dm5 
rem en daarna achtereenvolgens: 
rem energie in kilojoule/19S qg 
rem vet, eiwit en koolhydraat 

rem in 39/1938 3. 
data"kippen",;,2,1.1,689,9,18,9 
data"kalfsvlees",8,1.2,489,5,21,9 
data"rundvlees",4,1.2,8354,15,29, 8 
data"varkensvlees" 
datag,i.1,1698,34,1,5 
data"metuorst" 
data®.91,1,1988,41, 18,5 
data"lever",9.92,8.9,559,4, 18,4 
data"haringen" 
datag.15,1.2,1998,17,15,9 
data"eieren",0.46,1.1,689,11,15,8 
data melk”,1, Jet INS, 1 5 
data"boter" ‚5. Bi, 8. 0: 322, 84,1, 
data"kaas",S. S5, 3. 0 /6i 5, 35, 3 
data"appels",9.2,9.9,247,9,3, i4 
data"pruimen",9.84,6.8, 596, 8,3,17 
data"tomaat",8.96,9.95,85,9,8,4 
data’ tomaten” ,9. 86,8.95,85, 8. GS, 
data"spinazie" ‚9, As 65, Bs is2 
data"boaerenkoal" 
dataë,4.8,189,6,2. e dn 
data"wortels",8.92,9.95,165,9,5,9 * 
data"aardappelen”" 
datag.1,1.1,499,5, 1,21 
data”brood”,8.92,8.5,1612,5, 12,74 
data"boterham” 

data, 02.,0,5,1612.,5.12. 70 


4 


data"andijvie",g,0. 
data postelein” 
data"prei",@,1,85, 
data"jam",S, 3. 8, 1959, 
data” pindakaas” 
datag,9.9,2948,65,21, 15 
data”"ham",4.82,1,1999,28, 15,1 
data"suiker" 
data9.994,1.1,2990,9,9, 199 
data"soep",;9,1,209, 35,1, 
data” yashupt, B,1,328,9.,4,5 
data"vla",S, ee 382, sds 14 
data"jus",g,8.2, 259, 41,1 
rem %%* stuks PE 
data"plakjes", "plakken" 
data"klontjes" 
data"sneetjes" 

rem ##* massa's H% 
data"g",9.081 

data"ons",@.1 
data"pond",8.5 

data"kg",1 

rem %% volumina #% 
data"theelepels",8. 092 
data"eetlepels",8.81 
data"lepels",g.91 
data"juslepels",8.94 
data"theekopjes",g. 125 
data"schaaltjes",8.159 

data "borden ‚9.149 
data"koppen",8. 158 
data"kopjes",8.1 

data” mokken” ‚9. 135 
data"glas",9.178 
data"glazen",8.178 
data"bekers",8.2 
data"ml",8.941 
data"cl",8.@1 

data"d1",8.1 


data" i®,L 

rem HANINKKNKRA ANNA K 
rem %* voedingswaarde % 
rem % daor % 
rem % rien van dongen %# 
rem % (er Zeis PRA 


% 
rem HAAN NNANNKKKN KNK KK 
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Oge Kruijt 


De software- 


oscilloskoop 


Een condensator biedt de mogelijkheid 
elektrische lading op te slaan. Wanneer 
een opgeladen condensator aan zijn lot 
wordt overgelaten; blijft de spanning er- 
over constant. Bij een spoel is het niet de 
spanning, maar juist de stroom die con- 
stant wil blijven. Voor het geval dat een 
condensator of een spoel van buitenaf 
beïnvloed wordt, kunnen we eenvoudige 
formules opschrijven. Een computerpro- 
gramma kan met die formules een scha- 
keling nabootsen. We krijgen dan op het 
computerscherm de trillingen te zien, die 
een oscilloskoop aan de echte schakeling 
zou opmeten. 


Bouwstenen voor het programma 


Een stroom IC kan een condensator la- 
den. Daardoor verandert de spanning 
over de condensator met een bedrag DU 
in de tijd DT. Wanneer C de capaciteit van 
de condensator is, dan is de formule voor 
deze grootheden: 

DU = (1/C) * IC * DT. 

Om de formule voor een spoel te krijgen, 
moeten we de spanning U en de stroom | 
van rol laten wisselen. De formule wordt: 
DI = (1/L) * UL * DT. 

De L staat hierbij voor de zelfinductie van 
de spoel. De formule in het programma is 
iets ingewikkelder, omdat de draad van de 
spoel ook nog een weerstand RL heeft. RL 
is in het echt geen apart onderdeel, maar 
zit in de spoel. Voor de spoelweerstand 
RL en voor de losse weerstand RV geldt 
de wet van Ohm: stroom = spanningsver- 
schil/weerstand. 

Met deze drie bouwstenen is het pro- 
gramma opgezet. Het rekent van moment 
tot moment uit wat de schakeling doet 
met de inkomende spanning UI. Deze 
gaat op en neer in een ritme dat we kun- 
nen invoeren als de hoekfrequentie W. De 
hoekfrequentie is 21 maal de gewone fre- 
quentie. De gebruikelijke benaming voor 
hoekfrequentie is de Griekse letter 
omega. De W is de computerletter die hier 
het meest op lijkt. 


Componenten 


Voor verschillende waarden van W heeft 
de uitgangstrilling UU een verschillende 
uitslag. De schakeling werkt als filter. Er is 
een bepaalde trilling die goed wordt door- 
gelaten. Hogere en lagere frequenties 
worden meer gedempt. De voorkeur voor 
een bepaalde frequentie heet resonantie. 
De resonantie van een LC-schakeling 
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TECHNIEK 


Met een computerprogramma kunnen we gemakkelijk het 
gedrag van een condensator of een spoel nabootsen. 
Aangesloten op een oscilloskoop zouden we in het echt 
bepaalde trillingspatronen zien. Ons programma tovert die 
trillingen levensecht op het beeldscherm. 





wordt gebruikt om een radio een bepaalde 
zender te laten selecteren uit een groot 
aanbod van radiogolven. 

De weerstand RV, de condensator C en 
de spoel L zijn zogeheten passieve com- 
ponenten. Bij passieve componenten is 
de uitslag van de uitgangsspanning altijd 
kleiner dan die van de ingangsspanning, 
zelfs bij de resonantiefrequentie. De ver- 
schillende uitslagen kunnen we gebruiken 
om op het beeldscherm ingangs- en uit- 
gangstrilling van elkaar te onderscheiden. 
Wanneer we de weerstand vervangen 
door een actieve component (een transis- 
tor), dan is het mogelijk de resonantietril- 
ling op te wekken zonder ingangstrilling 
van buiten. De schakeling voor de ver- 
keersdetector (A&K/DJO 8/1986, bladzij- 
de 804-806) laat zien, hoe dat moet. 


Nagebootste trilling 


We kunnen het programma gebruiken om 
voor de gegeven waarden van L en C de 
hoekfrequentie voor resonantie op te 
zoeken. Er bestaan ook formules die het 
gedrag van de hele schakeling direct be- 
schrijven, maar die zijn lastig af te leiden. 
Voor die formules gaat men uit van ideale 
trillingen, die altijd bestaan hebben en al- 
tijd zullen blijven voortduren. Onze nage- 
bootste trilling begint pas op het tijdstip T 
—= 0. De schakeling heeft dan nog geen 
voorgeschiedenis. Daarom wijkt het begin 
van de grafiek iets af van wat er later ge- 
beurt. 

De resonantie speelt niet alleen voor de 
uitslag van de uitgangsspanning een rol. 
Ook de ligging van de toppen van de uit- 
gangsspanning verandert. Voor W-waar- 
den aan de ene kant van de resonantie 
liggen de uitgangstoppen na de ingang- 
stoppen. Voor W-waarden aan de andere 
kant liggen ze ervoor. De verandering van 
de plaats van de toppen heet fasever- 
schuiving. We kunnen onderzoeken, hoe 
de uitgangsspanning zich gedraagt bij an- 
dere waarden van RV, C, L en RL. Verder 
zijn we niet gebonden aan de SIN-vormige 
ingangsspanning UI. Het is ook mogelijk 
het gedrag van UU te bestuderen bij een 
spanningssprong. Ul moet dan nul zijn tot 
aan een bepaald tijdstip en vervolgens ge- 
lijk aan UM. Een andere variatie is het laten 


tekenen van |, IL ofdC in plaats van UU. 


Een RLC-schakeling. 





Figuur 2. Bij de hoekfrequentie van resonantie 
gaat de uitgngstrilling gelijk op met de ingangs- 
trilling. 
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Figuur 3. Bij hogere frequenties loopt de uit- 
gangstrilling achter bij de ingangstrilling en is 
de uitslag kleiner. 
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Figuur 4. Bij lagere frequenties ligt de uitgangs- 
trilling voor op de ingangstrilling. Ook hier is de 
uitslag klein vergeleken bij de resonantie. 





| Figuur 1. Het schema van de schakelingen. 
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Programmalisting. Het programma is in Basi- 
| code-3. 


' RLC schakeling 


_ 1909 A=600:GOTOZO:REM - RLC-schakel ing 
1818 PRINT 

PRINT lui RU uu" 

| 1839 PRINT" irt 

If 1848 PRINT" AN ij 

me 1950 PRINT" C els 

1960 PRINT" | ML 

18709 PRINT" u 

NNS. PRINT" --s eee! 

10398 PRINT 

j 1100 PRINT"Dit programma tekent een” 

1118 PRINT"graf iek van de ingangsspanning" 

1129 PRINT"ui en de uitgangsspanning uu“ 

Fr 1138 PRINT" in deze schakeling." 

1148 PRINT 

1158 RV=I:REM weerstand 

1169 RL=.1:REM weerstand spoel 

MNI Le. 2IREM zelfinductie spoel 
1188 C=l:REM condensator 
1199 UU=BEREM uitgangsspanning 

1298 IL=O:REM spoelstroom 

Re 1218 DT=.B2:REM tijdstap 

EP 1229 TT=1O:REM eindtijd 

s 1239 UM=.4:REM maximale spanning 

1249 PRINT "hoekf rekwentie van ui (B.5-18) "5 

| 1258 INPUTW 

1268 GOSUBS6QB:REM graf isch scherm 

1228 CN=BE:REM wvoorgrondkleur 

Need FORT=0 TOTT STEPDT 

12398 UI=UMXSINCWKTIEREM spanning In 

1328 I=CUI-UU)/RUIREM wet van Ohm 


























Jk RLC schakeling 


Ĳ 1318 IC=I-IL:REM splits stroom 

Ĳ 1328 DU=CIACIKICKDTEREM condensator 
1330 UU=UU+DUE:EREM spanning uit 

| 1348 DI=C1ZLIXCUU-ILXRLIJKDTEIREM spoel 
1358 IL=IL+DIEREM stroom spoel 

| 1368 VE=.S-UUE:REM plotwaarde uu 

| 1328 HO=TZTTXCI-1/HGJIEREM tijdwaarde 











f 1388 GOSUB620:REM punt 
N 1398 VE=.S-UI:REM plotwaarde ui 
1488 GOSUB620:REM punt 


1418 NEXTTEREM volgende tijdstip 
1420 GOSUBIADEREM tekstscherm 
ko 14309 GOTOIISOE:REM andere W 
32000 REM 
32010 REM Oge Kruijt 
320208 REM Pr. Willem de Zwijgerln 2 
32030 REM 33991 BR HOUTEN 
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Computers 





en 
huishouden 


”Informatie- en huishoudkunde liggen veel 
minder ver uit elkaar dan mensen denken. Het 
onderwijs in de informatiekunde kan allerlei 
voorbeelden gebruiken uit het huishouden. Re- 
cepten en breipatronen zijn een zelfde soort 
voorschriften als computerprogramma'’s. Het 
onderscheid tussen ingrediënten en berei- 
dingswijze kun je gebruiken om het verschil 





tussen gegevens en programma duidelijk te 


maken. ledereen kent de streepjescode, auto- 
matisering in het grootwinkelbedrijf, die het 
huishouden raakt.” 


aldus Gerda Casimir, aftredend voorzit- 
ster van de Vereniging voor Huishoud - 
kunde. 


De kast in 


Over computers en huishouden worden 
ook dingen gezegd die niet waar zijn. 
Neem bijvoorbeeld de advertenties en fol- 
ders waarmee men thuiscomputers pro- 
beert te verkopen. Daarin wordt beweerd 
dat de thuiscomputer goed is om: 

a. computers in het algemeen te leren 
kennen; | 

b. dingen te leren; 

c. voor spelletjes; 

d. voor het huishouden. 

Dit tijdschrift probeert de eerste twee din- 
gen in te vullen. De ware redenen waarom 
veel mensen een computer kopen, zijn de 
spelletjes. Met die aankoop slaan ze een 
gat in het huishoudbudget. Om dat gat 
goed te praten, hebben de computerver- 
kopers ook nog vermeld dat het apparaat 
nuttig zou zijn voor het huishouden. Meer 
zit er niet achter. Maar zelfs onderzoekers 
van de Landbouwuniversiteit Wagenin- 


gen hebben deze reclamekreet serieus 


genomen. 
Zij zijn thuiscomputers gaan bekijken op 
dezelfde manier als ze stofzuigers en 
koelkasten beoordelen. Het gaat er daar- 
bij om of de apparaten zonder voorkennis 
in het huishouden kunnen worden inge- 
zet. Geven de folders zinnige informatie’? 
Geeft de handleiding de toepassingen 
goed aan? Kan de koper vooraf te weten 
komen welk merk het best geschikt is? 
Op al dit soort vragen is het antwoord 
ronduit nee. Pas na een paar maanden 
kan de koper erachter komen dat het toch 
het verkeerde merk was. Echt nuttige 
huishoudtoepassingen blijken er niet te 
zijn. Uiteindelijk verdwijnt het apparaat 
voorgoed in de kast. 

Nog een interessante waarneming uit het 
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De computer heeft in het huishouden nog geen enkele zinnige 
toepassing, ook al beweren computerverkopers graag het 
tegendeel. De computer is een hobby-apparaat, vooral van 
mensen met een flink inkomen. In de toekomst zal wel de 
automatisering in het huishouden langzaam toenemen. De 
meest opvallende ontwikkeling lijkt het winkelen per telefoo 
te zullen worden. | 


onderzoek was, dat vrouwen die in een 
computerwinkel om informatie kwamen 
vragen, niet serieus werden genomen. 

Een onderzoek naar het huishoudelijk nut 
van modelspoorbanen zou precies dezelf- 
de resultaten hebben opgeleverd. Nie- 
mand zal echter op het idee komen mo- 
delspoorbanen te gaan. beoordelen 
volgens dezelfde nuttigheidskriteria als 
stofzuigers en koelkasten. Een campagne 
om vrouwen meer te betrekken bij het mo- 
delspoorgebeuren is nog niet gevoerd. 


Toepassingen nuttig genoeg? 


Toch zijn thuiscomputers niet helemaal 
vergelijkbaar met modelspoorbanen. Ze 
zijn veelzijdiger en daardoor lijkt er een 
weg open te liggen naar nuttige toepas- 
singen. De vraag wordt dan of die toepas- 
singen wel nuttig genoeg zijn om het geld 
en de moeite te rechtvaardigen. Een com- 
puter kan grafieken tekenen van onze uit- 
gaven en zo kunnen we betere beslissin- 
gen nemen over ons huishouden. In 
theorie, want in de praktijk loont het echt 
de moeite niet om zo moeilijk te doen. 
Gerda Casimir: “Er zijn natuurlijk altijd wel 
yuppies (snel carriëre makende jonge 
mensen, met een hoog inkomen red.), die 
het sjiek vinden als vrijetijdsbesteding uit 
te rekenen of de aanschaf van hun auto 
wel verantwoord was geweest.” 

De RVU (Radio-Volksuniversiteit) heeft 
een computerprogramma uitgebracht 
voor MSX-machines, waarmee we af- 
slankdiëten kunnen doorrekenen. Dat is 
nuttig, maar wanneer onze computer het 
alleen van zoiets moet hebben, gaat hij 
tòch na drie maanden voorgoed de kast 
in. We hebben dan inmiddels zelf genoeg 
inzicht in diëten gekregen. 

Als we het begrip huishouden wat breder 
opvatten, kunnen we ook belastingpro- 
gramma's tot de huishoudprogramma'’s 
rekenen. Die programma’s stellen ons on- 
geveer dezelfde vragen als het belasting- 
biljet. Daarmee gaan ze voorbij aan het 
hoofdprobleem bij het invullen daarvan. 
De belastingdienst heeft bepaalde opvat- 
tingen over de indeling van de inkomsten 
en uitgaven van de burger. Het hoofdpro- 
bleem van het invullen is het leren van die 


indeling. Pas als we de indeling beheer- 


sen, weten we welke inkomsten op welke 
plaats ingevuld moeten worden en - nog 
belangrijker - welke aftrekposten mogelijk 


zijn. 


Denkwijze veranderen 


Niet alleen belastingprogramma’s eisen 
dat we ons aan een strakke indeling hou- 
den. Zo ongeveer wil ieder computerpro- 
gramma dat we zelf ons probleem herlei- 
den tot kernachtige getallen die we dan 
kunnen invoeren. Mensen zijn echter niet 
gewend hun leven op zo’n schematische 
manier te zien. Bij het praten denkt ook 
niemand aan zinsontleding. 

Het is van oudsher de taak van het onder- 
wijs mensen schema's aan te reiken. Het 
succes is altijd wisselend geweest. Mis- 
schien dat de druk van de computermaat- 
schappij nu echter resultaten gaat afdwin- 
gen. Er wordt wel beweerd dat de 
problemen vanzelf zullen uitsterven, om- 
dat de jonge generatie nooit iets anders 
gezien heeft. Maar al vijf generaties zijn 
opgegroeid met spoorwegen, terwijl nog 
steeds velen niet met een spoorboekje 
overweg kunnen. Treinen rijden er al meer 
dan een eeuw. Toch hebben mensen nog 
altijd problemen met informatie over het 
treinverkeer. Met computers en automati- 
sering zal het niet anders gaan. 

Een belangrijke factor is het niet willen 
begrijpen. Een leefwereld waarin alles zo 
klaar is als een klontje, waar we over alles 
de baas zijn, verliest de broodnodige ro- 
mantiek. De kloof tussen de natuurlijke 
denkwijze van de mens en de denkwijze 
van de elektronica is ook buiten de com- 
puter te zien. Allerlei automatische appa- 
raten worden niet uitgebuit. Er bestaan 
programmeerbare fornuizen waarvan in 
de practijk alleen de handbediening wordt 
gebruikt. Om een wekkerradio in te stellen 
is een gebruiksaanwijzing nodig. Veel ou- 
dere mensen kunnen ook mêt gebruiks- 
aanwijzing niet met een wekkerradio over- 
weg. Wie automatische apparaten weet te 
bedenken, die ook nog eens gemakkelijk 
te bedienen zijn, moet goud kunnen ver- 
dienen. JN 
Een voorbeeld van een goed bedienbaar 
apparaat in de vrietijdssfeer is een 
schaakcomputer. Via een minimum aan 
toetsjes kunnen we onze zetten invoeren 
en dingen als de bedenktijd opgeven. Een 
aparte gebruiksaanwijzing is niet nodig. 
Alles wat te weten valt over het apparaatje 
- zo groot als een polstasje - staat afge- 
drukt op de achterkant ervan. | 


Nuttig via een omweg 
Misschien willen de mensen echter in hun 


hl 


eene ek enten en 


huishouden geen automatisering, ook niet 
met eenvoudig te bedienen apparaten. 
Wat schiet je op met al die nieuwe dingen? 
Gerda Casimir: :”’Als het aan de vrouwen 
of de huishoudkundigen had gelegen, 
zouden we nu nog in holen wonen. Ten- 
einde willoze studenten warm te krijgen 
voor veranderingen in het huishouden, 
begon ik vaak over gehandicapten: je 
hoeft maar een of ander lichamelijk ge- 
brek te hebben en het wordt ineens van 
levensbelang dat je keuken goed is inge- 
richt. Waarom zou je gehandicapten een 
bijzondere plaats geven? Wat goed is 
voor hen, is misschien ook buitengewoon 
goed voor andere mensen. Als het goed is 
voor iedereen, dan zijn er ook geen aan- 
passingen meer nodig en wordt het leven 
voor de gehandicapten een stuk minder 
duur. Een dergelijke redenering gaat on- 
getwijfeld op in. verband met informatie- 
technologie.” 


Winkelen via de telefoon 


Eén van de dingen die lastig zijn voor ge- 
handicapten en bejaarden, is boodschap- 
pen doen. Ze zijn daarbij vaak 
aangewezen op de hulp van anderen. 
Grote dingen kunnen ze bestellen bij post- 
orderbedrijven. Vroeger moest dat via een 
bon over de post. Tegenwoordig kan het 
per telefoon. Aan de kant van het bedrijf 
moet dan iemand de telefoon aannemen 
en de bestelling invoeren in de computer 
voor verdere verwerking. De nieuwe stap 
is dat de klant de bestelling zelf invoert in 
de computer van het postorderbedrijf. Dat 
zou kunnen via een thuiscomputer die aan 
de telefoon gekopeld is. 

Er is een andere methode die voor de 
klanten gemakkelijker te aanvaarden is. 
De computer van het postorderbedrijf 
wordt uitgerust met spraakchips die de 
klant eenvoudige aanwijzingen kunnen 
geven. De klant geeft klantnummer en be- 
stelnummers door via de toetsen van zijn 
toetsentelefoon. 

Rond deze vorm van winkelen (teleshop- 
ping) zijn de komende jaren allerlei ont- 
wikkelingen te verwachten. Nu gaat het 
vooral nog om gebruiksgoederen en luxe- 
artikelen. Straks zal het ook heel gewoon 
zijn levensmiddelen over de telefoon te 
bestellen die dan binnen een paar uur 
worden afgeleverd. Voor het bedrijfsleven 
zijn er enorme voordelen. Er zijn geen 
mensen meer nodig om telefoons aan te 
nemen. De koopwaaropslag en de bezor- 
gingsdienst kunnen bij zoveel automatise- 
ring heel erg goedkoop werken. Het hele 
systeem is veel goedkoper dan een gewo- 
ne winkel. Er is bijvoorbeeld geen winkel- 
diefstal. 

Er zijn mensen die beweren te weten hoe 
een teleshoppingbedrijf moet worden op- 
gezet. Hun rapporten gaan in bepaalde 
kringen voor grof geld van hand tot hand. 
Teleshoppingbedrijven zijn echter nog 
niet zonder meer goudmijnen. Ze hebben 
klanten nodig. Wie een bedrijf begint voor- 
dat er voldoende moderne klanten zijn, zal 


het toch slecht gaan, ook al zijn de voor- 


uitzichten op lange termijn nog zo goed. 
Teleshopping klinkt mooi in verband met 
bejaarden en gehandicapten. Ze kunnen 
zelf alles regelen en zijn niet meer afhan- 


kelijk van vrijwillige hulp. Ze hebben ech- 
ter niet zoveel geld. Op het ogenblik moe- 
ten bij teleshopping nog steeds extra 


bezorgkosten worden betaald. De bedrij- 


ven zullen zich vooral richten op mensen 
die meer geld te besteden hebben. Daar- 
bij zijn de mensen met veel koopkracht 
ook juist de mensen met weinig tijd om dat 
geld via gewoon winkelen in de stad uit te 
geven. Het gaat dan om tweeverdieners 
en alleenstaande yuppies. 


Etalage bij u thuis 


Teleshopping biedt niet alleen nieuwe 
mogelijkheden, er kunnen ook oude mo- 
gelijkheden gaan verdwijnen. Eerst heb- 
ben de super- en hypermarkten de buurt- 
winkels verdrongen. Nu versterkt de 
moderne manier van teleshopping de po- 
sitievan de postorderbedrijven ten op- 
zichte van gewone warenhuizen en win- 
kels. Gaat in de toekomst al het lopen 
plaatsvinden in de gouden gids? Dat zit er 
niet in. Gewoon winkelen is daarvoor te 
gezellig. Bepaalde dingen wil je gevoeld 
hebben voordat je ze koopt. 

Een ander punt is reclame- en koopverlei- 
ding in het algemeen. De sprekende com- 
puter van nu meldt het direct wanneer het 
gevraagde tijdelijk niet in voorraad is. De 
klant zal in dat geval vaak zeggen: laat het 


dan maar. Die rem op de verkoop was er in 
het posttijdperk nog niet. Inmiddels weet 
het bedrijf wel dat iets gevraagd is wat er 
niet was. Die informatie kan gebruikt wor- 
den om te voorkomen dat dat niet zo gauw 
meer voorkomt, terwijl er toch geen over- 
bodige voorraad hoeft te zijn. De verkoper 
is dus niet helemaal zo onbaatzuchtig als 
de klant zou kunnen denken. 

In een gewone winkel kopen de mensen 
altijd meer dan ze van plan waren. Die 
Impulsaankopen zijn een belangrijk deel 
van de omzet. Bij teleshopping is er in 
theorie steeds alle mogelijkheid voor rus- 
tig nadenken en vergelijken. Vergelijken 
kost echter tijd en tijd heeft de typische 
teleshopper juist niet. Wanneer het winke- 
len thuis straks met beeldschermen ge- 
beurt, zullen de bedrijven ongetwijfeld ook 
ongevraagd hun aanbiedingen op het 
scherm laten komen. In dit beeld zal de 
computer op zich niet zo'n geweldige rol 
in het huishouden gaan spelen; de infor- 
matietechnologie zal veel belangrijker zijn. 


Een programmeerbaar fornuis maakt erbij blij- 
ven staan en het gebruik van een keukenwek- 
ker overbodig. Toch worden heel wat van die 
fornuizen met de hand bediend. De gebruiker 
heeft niet echt vertrouwen in het apparaat. 





191 


houdkosten beter beheersen met een thuiscomputer blijft een hobby voor yupp 
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In beroepsmatig gevoerde huishoudingen als 
ziekenhuizen en bejaafdentehuizen worden 
met de computers menu's samengesteld aan- 
gepast aan de diëten van de verschillende be- 
woners. Voor het privé huishouden is zoiets een 
mijl op zeven. Ilustraties Culimax, Purmerend 









Dr. W. van Tend 
Siso kode 835.5 en 365 


Een stambos 


uit de 


thuiscomputer 


We hebben een computerprogramma 
gemaakt dat deze ontwikkeling na- 
bootst. Volgens bepaalde waarschijn- 
lijkheden construeert het een verzame- 
ling stambomen, vandaar de naam 
stambos. 

De waarschijnlijkheden zijn afgeleid uit 
gegevens over Engelse families sinds 
het jaar 1350. De duur van één generatie 
kwam daarbij uit op 28 jaar. Dat wil zeg- 
gen dat zonen gemiddeld trouwen op 
het moment dat hun ouders 28 jaar ge- 
trouwd zijn. Tussen het jaar 1350 en nu 
liggen 22 of 23 generaties. 


Toevalsgetal 


Het programma trekt iedere generatie 
voor ieder gezin een toevalsgetal. Dat 
toevalsgetal wordt naast de waarschijn- 
lijkheden gelegd en zo wordt bepaald 
hoeveel gezinnnen in de volgende ge- 
neratie dat gezin feitelijk voortbrengt. 
Wanneer van de oude generatie alle ge- 
zinnen met een bepaalde naam aan de 
beurt zijn geweest, is bekend hoeveel 
gezinnen die naam zullen hebben in de 
nieuwe generatie. 

Wanneer geen van de gezinnen met een 
bepaalde naam een nieuw gezin met die 
naam voortbrengt, sterft er een naam 
uit. Per gezin is de kans dat er geen 
trouwende mannelijke nakomelingen 
zijn 0,317. Standaard begint het pro- 
gramma met honderd namen. Bij elke 
naam hoort één gezin. We kunnen dan 


verwachten dat in de eerste generatie 


32 namen zullen uitsterven (eigenlijk 
31,7). Nu gaat het om een toevalsge- 
beuren en dus zal dit getal zelden pre- 
cies gerealiseerd worden. 


Meer gezinnen, minder namen 


Een zelfde toevalseffect is er ook bij de 
bevolkingsgroei. De waarschijnlijkhe- 
den voor 1 en meer gezinnen in de nieu- 


we generatie houden in, dat 1000 oude — 


gezinnen 1145 nieuwe voortbrengen. 
Bij dit groeipercentage van 14,5 zouden 
er na één generatie 115 gezinnen moe- 
ten zijn, als we weer met 100 beginnen. 
Een enkele keer is de nieuwe generatie 


| echter zelfs kleiner dan de begingenera- 


tie! 
In de loop van de generaties komen er 
steeds meer gezinnen en minder na- 
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Bij een huwelijk krijgt het nieuwe gezin de naam van 
de man. De achternaam van de vrouw gaat verloren. 


men. Dat betekent dat in het algemeen 
meer gezinnen dezelfde naam zullen 
moeten gaan dragen. We zien dan ook 
het aantal gezinnen per naam stijgen. 
De families gaan steeds meer gezinnen 
tellen - als we de term familie alleen 
betrekken op de achternaam. De com- 
puteruitvoer vermeldt ook de grootte 
van de gemiddelde familie als percenta- 
ge van het totaal aantal gezinnen. 
Verder wordt een top-5 bijgehouden 
van de grootste families (de meest voor- 
komende achternamen). Het is interes- 
sant te zien hoe in de loop van de gene- 
raties namen die top-5 binnenkomen en 
weer verlaten. Een familie die veel ge- 
zinnen telt, heeft meer kans ook groot te 
blijven, omdat er veel gezinnen aan de 
nieuwe generatie bijdragen. Voor elk 
gezin op zich liggen de kansen echter 
precies gelijk als voor elk ander gezin. 
Stel dat een bepaalde naam al vele ge- 
neraties lang nummer 1 staat in de top- 
5. Op nummer 2 staat een naam die pas 
is binnengekomen, maar die bijna net 
zoveel gezinnen heeft. Dan is er een 
goede kans dat de nummer 1 in de vol- 
gende generatie voorbijgestreefd 
wordt. Het feit dat nummer 1 lang aan 
de top staat, helpt niet, alleen het kleine 
voorsprongetje in aantal. 

Behalve de top-5 laat het programma 
ook zien hoe het staat met de minst 
succesvolle namen. Die namen worden 
elk door slechts één gezin gedragen. 
31,/ procent van die namen zal een ge- 
neratie later uitgestorven zijn (de al eer- 
der genoemde waarschijnlijkheid 
0,317). 


Familiegroei 


In de loop van de generaties worden de 
families gemiddeld groter. Die groei van 
het gemiddeld komt ook de namen on- 
deraan de ladder ten goede. Op een 
gegeven moment telt de kleinste familie 
niet één , maar twee of zelfs nog meer 
gezinnen. De kans op het uitsterven van 
een naam die door twee gezinnen ge- 
dragen wordt, is een stuk kleiner. Zowel 
het ene als het andere gezin moet geen 


trouwende mannelijke nakomelingen 


voortbrengen. De kans dat ze beide aan 
die voorwaarde voldoen, is 0,317 maal 
0,317, dat is slechts één op tien. Hier- 
aan is het te danken dat het uitsterven 


Op deze manier sterft een groot aantal namen uit. Een 
groeiend aantal gezinnen moet het doen met steeds 
minder namen. 





van namen op een gegeven moment 
bijna tot stilstand komt. 

Bij het lopen van het programma zal het 
opvallen dat de afstanden tussen de 
meestvoorkomende, de gemiddelde en 
de minstvoorkomende namen behoor- 
lijk groot kunnen worden. Dit terwijl alle 
namen met gelijke kansen van start 
gaan. Een naam die in het begin flink 
groeit, is later echter maar moeilijk in te 
lopen. 


Uitsterven en overleven: toeval? 


De grote verschillen die ontstaan, bren- 
gen ons op de oorspronkelijke ont- 
staansreden voor programma’s als dit. 
Het ging daarbij niet om het uitsterven 
van familienamen, maar om het uitster- 
ven van plant- en diersoorten. De evolu- 
tietheorie van Darwin kent de kreet 
survival of the fittest”: de soorten die 
het best zijn toegerust voor hun omge- 
ving, blijven bestaan. Voor onze 
achternamen geldt zoiets duidelijk niet: 
de ene naam is net zo goed als de ande- 
re. Toch sterft de ene uit en de andere 
niet. 

Zou ook bij plant- en diersoorten het 
toeval verantwoordelijk zijn voor uitster- 
ven en overleven? 

Op bepaalde momenten in de aardge- 
schiedenis zijn plotseling grote aantal- 
len soorten tegelijk uitgestorven. Zou 
een computerprogramma als dit dat 
ook kunnen laten zien, zuiver als gevolg 
van toeval? Het zou dan bijvoorbeeld 
niet nodig zijn het uitsterven van de reu- 
zenreptielen toe te schrijven aan een 
meteorietinslag. 

Een programma voor het naspelen van 


toevalsevolutie moet op één punt dui- 


delijk anders zijn dan ons namenpro- 
gramma. Achternamen kunnen alleen 
maar uitsterven, nieuwe plant-. en 


diersoorten kunnen ook na het begin  { 


van de simulatie nog ontstaan. Dit is een 
verandering in de opbouw. Afgezien 
daarvan moeten ook de juiste waar- 
schijnlijkheidsgetallen worden gekozen 
voor groeien, slinken en afsplitsen van 
een nieuwe soort. Toen men het erover 
eens was geworden wat de waarschijn- 
lijkheden voor het evolutieproces wa- 
ren, bleek dat de grote uitstervingsgol- 
ven uit de geschiedenis duidelijk geen 
toeval waren. Het zoeken naar echte 





oorzaken is dus niet overbodig. 

Wie zin heeft evolutie-volgens-toeval na 
te spelen kan zelf ons programma daar- 
voor wijzigen. Nog eenvoudiger ver- 
anderingen kunnen echter ook al nieu- 
we dingen laten zien. Hoe beïnvloedt 
het kiezen van andere waarschijnlijkhe- 
den het aantal namen dat overblijft? 
Een andere mogelijkheid is te beginnen 
met meer dan 100 namen. De rekentijd 
wordt dan wel langer. In iedere (steeds 
grotere) generatie moet voor meer ge- 
Zinnen een toevalsgetal getrokken en 
verwerkt worden. Het interessante aan 
een groter beginaantal is dat de meest- 
en minstvoorkomende namen verder 
van het gemiddelde afliggen. De leden 
van de top-5 uit 200 zijn uitzonderlijker 
dan die van de top-5 uit 20. Aan de 
onderkant van de ladder zal bij meer 
namen het uitsterven langer doorgaan. 


Computeruitvoer 1 
De waarschijnlijkheden waarmee het stambos- 
porgramma werkt. 


Computeruitvoer 2 
De uitvoer van het stambosprogramma. 


begonnen met 100 namen en 
100 gezinnen 

22e generatie 

b16 jaar verlopen 


aantal namen 24 

aantal gezinnen 2421 

100.87 gezinnen per naam 
gemiddeld 4.17% voar een naam 


aantal namen uitgestorven: 
in deze generatie O 
tot nu toe 7& 


namen top-5 

naamnr 27 met 319 gezinnen(13.2%) 
naamnr 31 met 2463 gezinnen{(10.9%) 
naamnr 53 met 1468 gezinnen( &.9%) 
naamnr 66 met 1465 gezinnen( &.8%) 
naamnr 88 met 1462 gezinnen( &.7%) 


EE Kan 


l naam heeft slechts 
10 gezinnen ( O.41%) 


Dr. W. van Tend 


GAARSCHIJNL IJKHEDEN 
per gezin, per generatie 
DATA regels 25000-25010 


naam niet verder: O. 517 
1 gezin : O. 3564 
2 gezinnen Et O0 
3 gezinnen : Ó.080 
A gezinnen OOS 
5 gezinnen 8 O0. 005 
& gezinnen s O.OOL 

aroeipercentage 14.50 


begonnen met 100 namen en 
100 gezinnen 

23e generatie 

644 jaar verlopen 


aantal namen 24 

aantal gezinnen 2761 

115.04 gezinnen per naam 
gemiddeld 4.17% voor een naam 


aantal namen uitgestorven: 
in deze generatie O 
tot nu toe 7& 


namen top-5 

naamnr 27 met 3561 gezinnen(13.1%) 
naamnr Si met 523 gezinnen(1i1.7%) 
naamnr 55 met 189 gezinnen( &.8%) 
naamnr 66 met 188 gezinnen( &.8%) 
naamnr 62 met 180 gezinnen( &.5%) 


Una UnN=- 


naam heeft slechts 
gezinnen ( O.29%) 


WISKUNDE 


MD == 


Zoek de grootste gemene deler 


leder tweetal natuurlijke getallen (groter 
dan nul) hebben een grootste gemene de- 
ler. Neem bijvoorbeeld 36 en 15. Het getal 
36 is deelbaar door 1, 2, 3, 4, 6, 9, 12, 18 
en 36. Bij 15 zijn de delers 1, 3, 5en 15. De 
gemeenschappelijke delers zijn dus 1 en 
3. Het getal 3 is de grootste gemeen- 
schappelijke deler. In ouderwetse taal 
heet dit de grootste gemene deler, GGD. 
Voor grote getallen kan de lijst van delers 
erg lang worden. Gelukkig is er een me- 
thode om de GGD te vinden, zonder dat 
we delers hoeven te zoeken. Die snelle 
methode is al in de oudheid gevonden en 
wordt toegeschreven aan Euclides. 

„Een deler past een geheel aantal malen in 
het getal. De GGD past in beide getallen 
en dus ook in het verschil. Hij past ook in 
alle veelvouden van de getallen. We pro- 





beren nu het kleinste getal een aantal ma- 
len in het grootste te passen. In het alge- 
meen zal er een rest zijn. Die is kleiner dan 
het kleinste getal. De nog onbekende 
GGD past een geheel aantal malen in de 


rest, net zoals hij een geheel aantal malen 


in het verschil past. 

We verversen nu onze getallen. We ne- 
men het kleinste van de begingetallen en 
de delingsrest. Het grootste getal zijn we 
kwijt. De twee getallen van nu hebben nog 
wel dezelfde GGD. 

Met onze nieuwe getallen herhalen we de 


procedure. Het tweetal waarmee we 


werken, wordt steeds kleiner. Op een ge- 
geven moment past het kleinste getal pre- 
cies een geheel aantal malen in het groot- 
ste. De rest is nul. Op dat moment is het 
kleinste getal de gezochte GGD. Wanneer 


we van het programma regel 1000 wegla- 
ten, kan het draaien zonder de gebruikelij- 
ke Basicode-voorloper. Op sommige 
computers moeten spaties worden tus- 
sengevoegd achter de Basic-woorden. 


Het computerprogramma Euclides. 


1098 A=100:GOTO2A:REM euclides 

1819 PRINT 
1020 PRINT Snelle berekening van! 
1030 PRINT"de. grootste gemene 

1948 PRINT deler (aad on de manier! 
1058 PRINT van Euclides. 

1869 PRINT 

10/4 PRINT eerste getal s 

1089 INPUTA 

1090 PRINT tweede getal 's 

11098 INPUTB 

1119 IFASB THEN1139 
1129 C=A:A=B:B=CiREM ‘verwisseling 
1139 C=B-AKINT(B/ZAIIREN reset 

1149 IFC=@ THENIIGOE:REM gevonden 
1159 B=A:A=C:GOTO1130:REM opnieuw 
1104 PRINT de agd is 1 

1178 GOTO1268 


300008 REM 

300109 REM literatuur: 

39029 REM 

30030 REN PlacLane Kk Birknorr 
30048 REM Algebra 

30058 REM Maemillan, New York. 1407 
30060 REM bladzijde 159-160. 
390970 REM 

30089 REM een bas icode-2 
30099 REM programma van 
39100 REM 

30118 REM Pim van Tend 

30120 REM Veldheimwg 8 

34130 REM 6871 COD RENKUM 
30140 REM 

39150 REN ecopgright Lel 1482 
38160 REM Stichting Flens en 
30179 REM 


Wetenschap, Huizen NH 


Het computerprogramma Euclides aan het 
werk. 


Snelle berekening van 

de grootste gemene 

deler (ggd) op de manier 
an buclides 


sad 


eerste getal 36 
tweede getal ? 15 
de geod Je 3 


eerste getal 2 184 
tweede getal 7 Zak 
de ggd 8 20 

eerste getal f 448 


tweede getal ? 2684 
de ogd is OH 


Listing Stambos — 
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10 SCREEN O:WIDTH 8O0:KEY OFF: RANDOMIZE (VAL (RIGHTS (TIMES, 2) ) £60+VAL (MIDS 
(TIMES, 4,2))) 

11 GOTO 1000 

20 DEFSNG A-Z: 60T0 1010 


100 
‚110 
120 
200 
210 
211 
212 
250 
2460 
270 
300 
310 


SCREEN O0: CLS: RETURN 

LOCATE (VE AND 255 AND VE>-1)+1, (HO AND 255 AND HO>-1) +1: RETURN 
HO=POS (0) —1: VE-CSRL IN-1 : RETURN 

IN$=INKEY$: RETURN 

REM =O: LOCATE, , PEEK (&HFCA®) XOR 

GOSUB 200:1F IN$=""THEN 211 

LOCATE, , 0: RETURN 

BEEP: RETURN : 

RV=RND (1) : RETURN 


FR=FRE (0) +FRE (7 ") : RETURN 


SR$=MIDS (STR$ (SR) , 24 (SR£0) ) s RETURN 
OH=ABS (SR) +. 5410 -CNEO!=ZINT COR) s Of=1+OH-0O! 7 08e" " 


ZS1i IF CN THEN O$="."+STRINGSC(CN, 48): IF Of#?>1 THEN MID$(OS, 1)=MIDS (STRS$ (O4) , 5) 
312 OS=MIDS(STRS(O!),2) +04: IF VAL(OS) 20 AND SR<O THEN O$="-"+0% 

S15 IF LENCOS)<=CT THEN SR$=SPACES (CT-LEN (OS) } +0$: RETURN 

314 SRS=STRINGS (CT, 42) « RETURN 

350 LPRINT SR$; : RETURN 

360 LPRINT: RETURN 

600 SCREEN 105, ,7, 7: CLS: RETURN 

620 GOSUB 455: IF CN=O THEN PSET(OH,OV) ELSE PRESET (OH, OV) 

&21 RETURN 

630 GOSUB 455: IF CN=O THEN LINE-(OH,OV) ELSE LINE- (OH, OV), O0 
631 RETURN 

650 GOSUB 4655:LOCATE 1+INT(OV/13),1+INT(OH/B): PRINT SR$:RETURN 

655 OH=HOK640: IF OH<O OR OH>639 THEN OH=-659& (OH>90) 

656 OV=VERS25: IF OV<O OR OV>324 THEN OV=-324% (OV290) 

657 RETURN 

950 GOSUB 100:STOP 

„el 

962 ’ einde voorloper voor IBM kloon met superresolutiescherm 

gas ” 

GEA 7 

1000 A=200:G0T0 20:REM stambos 

1010 GOSUB 1O0O:REM scherm schoon 

1020 REM 

1030 REM uitleg 

1040 REM 

1050 PRINT"Bij een huwelijk krijgt het nieuwe" 

1060 PRINT"gezin de naam van de man. De naam" 

1070 PRINT"ven de vrouw gaat verloren." 

1080 PRINT"Zo zullen in de loop van de" 

1090 PRINT"generaties bepaalde namen uitsterven” 

1100 PRINT'en andere zich sterk verbreiden." 

1110 PRINT"Het programma bootst dit na." 

1120 PRINT 

1130 PRINT'"Iedere naam heeft gelijke kansen." 

1140 PRINT"De waarschijnlijkheden zijn" 

1150 PRINT"afkomstig uit statistisch onderzoek" 

1140 PRINT"over de Engelse bevolking" 

1170 PRINT"sinds 1350. Experimenteer ook eens" 

1180 PRINT"met andere waarschijnlijkheden." 

1190 PRINT 

1200 PRINT"uitvoer naar printer (j/n) ?"4 

1210 GOSUB Z1O:REM wacht op toets 

1220 IF (INS="N") OR (IN$="n") THEN PX=0:G0T0 1250 

1230 IF (IN$="J") OR CIN$="i") THEN PX=1:G0T0 1250 

1240 GOTO 1210:REM geen goede toets 1880 GOSUB 3750 

1250 GOSUB 3720:REM bezig 1885 IF PX=1 THEN GOSUB 360 

1240 REM 1890 GOSUB 3690:REM wacht op toets 
1270 REM aantal namen 1900 REM 

1280 REM 1910 REM 

1290 NN=100 1920 REM generatienummer en 
1300 REM 1930 REM jaren per generatie 
1310 REM aantal gezinnen per naam 1940 REM 

1520 REM 1950 GE=O:JG=28 

1330 DIM NG (NN) 1940 REM 

1340 REM 1970 REM generatie verder 

1350 REM begin met 1 gezin per naam 1980 REM 

135460 REM 1990 GOSUB 2060 

1370 FOR NM=1i TO NN 2000 GE=GE+1: IN=IJGKGE 

1580 NG (NM) =1 2010 GOSUB 2960:REM uitvoer 

1390 NEXT NM 2020 GOTO 1990 

1400 REM 2030 REM 

1410 REM ruimte voor meest 2040 REM subroutine generatie verder 
1420 REM succesrijke namen 2050 REM 

1430 REM 2060 AG=O:REM totaal aantal gezinnen 
1440 TN=5:REM aantal topnamen 2070 NU=O:REM nieuwe uitstervingen 
1450 DIM TPCTN:REM aantal gezinnen 2080 TU=O:REM totaal uitstervingen 
1440 DIM TR(TN):REM naamnummer 2090 REM 

1470 REM 2100 REM beginwaarden hitlijst 
1480 REM hoogste aantal trouwende 2110 REM 

1490 REM mannelijke nakomelingen +1 2120 FOR I=1i TO TN 

1500 REM 2130 TP(I)=O 

1510 LW=7 2140 TR(I)=O 

1520 REM 2150 NEXT 1 

1530 REM waarschijnlijkheden 2160 REM 

1540 REM 2170 REM aantal gezinnen met minst 
1550 DIM WS (LW) 2180 REM voorkomende naam 

1560 GI=O:REM begin voor groet 2190 REM (wordt later meestal 1) 
1570 FOR I=1 TO LW 2200 REM 

1580 READ WS(I) 2210 MI=9IIGG! 

1590 IF I<>1 THEN 1700 2220 REM 

1600 GOSUB 1OO:REM scherm schoon 2230 REM aantal namen met kleinste 
1610 UI$=" WAARSCHIJNLIJKHEDEN" 2240 REM aantal gezinnen (MI) 
1620 GOSUB 3750:REM uitvoer 2250 REM 

1630 UI$=" per gezin, per generatie” 2260 MN=O 

1640 GOSUB 3750 2270 REM 

1650 UI$=" DATA regels 25000-25010" 2230 REM hoofdlus 

1640 GOSUB 5750 2290 REM loop de namen af 

1670 UI$="":GOSUB 35750 2300 REM 

14680 UI$=" naam niet verder: " 2310 FOR I=1 TO NN 

1690 GOTO 1760 2320 REM 

1700 GI=GI+(I=-1)KWS(IJsREM groei% 2330 REM geen gezinnen bij naam 
1710 CT=IsCN=OESR=I-ls REM 1 cijfer 2340 REM 

1720 GOSUB 310 2350 IF NG(I)=0O THEN 2820 

1730 UI$=" H+SR$+" gezin" 2360 REM 

1740 IF I=2 THEN UI$=UIS+" 8” 23570 REM 

1750 IF I<>2 THEN UI$=UIS+"nen 8 2380 REM opbouw nieuwe generatie 
1760 CT=5:CN=3:SR=WS(I) :GOSUB 510 2390 REM 

1770 UI$=UI$+" "+SR$ 2400 HU=O 

1780 GOSUB 3750 2410 REM ieder gezin krijgt een 
1790 IF I>1 THEN WS(IJ=WS(I)+WS(I=-1) 2420 REM kans 

1800 NEXT I 2430 REM 

1810 REM 2440 FOR J=i TO NGI) 

1820 REM groeipercentage 2450 REM 

1830 REM 2460 REM toevalsgetal in RV 
1840 UI$="": GOSUB 3730 2470 REM 

1850 CT=S:CN=2:SR=CGI-1) 100 2480 GOSUB 240 

1840 GOSUB 510 2490 REM 

1870 UI$=" groeipercentage "+SR$ 2500 REM bepaal aantal trouwende 
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2510 


35240 


3270 
35280 
35290 
3500 
33510 
3320 
3550 
3340 
3550 
3560 
3370 
3380 
3390 
3400 
3410 
3420 
34350 
3440 
3450 
5460 
3470 
5480 
35490 
3500 
3510 
3520 
3530 
3540 
3550 


5560 
3570 
3580 
5570 
5600 
3610 
5620 
36530 
5640 
3645 
5650 
3660 
3670 
5680 
3690 
5700 


REM mannelijke nakomelingen 

REM 

FOR K=i TO LW 

IF RV<=WS(K) THEN K=LW+1:60T0 2560 
HU=HU+ 1 

NEXT K 

REM 

REM volgende gezin met deze 

REM naam 

REM 

NEXT J 

REM 
REM 
REM 
REM 
REM 
IF HU=O THEN NU=NU+1 

REM ] 

REM nieuwe aantal gezinnen 


klaar met een naam 


naam nieuw uitgestorven? 


REM bij naam 

REM 

NG CI) =HU 

REM 

REM totaal aantal gezinnen 
REM 

AG=AG+HU 

GOSUB 38FO:REM hitlijst 
REM 

REM in totaal uitgestorven 
REM aantal namen 

REM 

IF NG(I)=0 THEN TU=TU+1 
REM 

REM volgende naam 

REM 

NEXT I 

REM 

REM klaar met alle namen 
REM 

RETURN 

REM 

REM subroutine uitvoer 
REM 

REM begin bovenaan scherm 


REM 

HO=O: VE=O: GOSUB 110 
UI$="begonnen met " 
SR=NN: GOSUB 300 
UI$=UIS+SR$+" namen 
GOSUB 3790 
UI$=59$+" gezinnen" 
GOSUB 3790 
SR=GE:GOSUB 3500 
UI$=SR$+"e generatie" 
GOSUB 5790 

SR=JN: GOSUB 500 
UIS=SR$+" jaar verlopen" 

GOSUB 35790 

UI$="":GOSUB 5790 

UI$="aantal namen ee 

SR=NN-TU: GOSUB 300 

UI$=UI$+SR$ 

GOSUB 3790 

UIi$="aantal gezinnen " 

SR=AG: GOSUB 300 

UI$=UI$S+SR$ 

GOSUB 5790 
CT=&:CN=2: SR=AG/ (NN-TU) : GOSUB 3510 
UIS=SR$+" gezinnen per naam" 
GOSUB 3790 

CT=5: CN=2: SR=1/ (NN-TU) K100 
GOSUB 510 

UIl$="gemiddeld "+SR$+"% voor een 
naam!” 

GOSUB 3790 

UI$="":GOSUB 3790 

UI$="aantal namen uitgestorven: " 
GOSUB 5790 

UI$="in deze generatie * 

SR=NU: GOSUB 500 
UI$=UI$S+SR&:GOSUB 5790 

UI$="tot nu toe ge 

SR=TU: GOSUB 500 
UI$=UIS+SR$:GOSUB 5790 
Ui$="":GOSUB 5790 
UI$="namen top" 
SR=TN: GOSUB 300 
UI$=UI$+SR$ 
GOSUB 3790 

FOR HP=1i TO TN 
SR=H9: GOSUB 500 
UIS=SR$+" naamnr 
SR=TR(H?) : GOSUB 300 
UI$=UIS+SR$+" met " 
SR=TP (HP) : GOSUB 300 
UIS=UIS+SR$+" gezinnen” 
SR=SRK100/AG: CT=4 1: CN=1 

GOSUB 310 

UI$=UIS+" ("+SR$4" 4) " 

GOSUB 3790 

NEXT H® 

UI$="":GOSUB 5790 

SR=MN: GOSUB 300 

UIS=SR$+" na” 

IF SR=1i THEN UI$=UI$+"am heeft” 
IF SR>1 THEN UI$=UI$+"men hebben 
elk" 


UI$=UI$+" 
GOSUB 3790 
SR=MI:GOSUB 3500 
UI$S=SR$+" gezin" 


en": 59$=5R$ 


slechts n 


IF SR>1 THEN UI$=UI$+"nen" 
SR=SRK100/AG: CT=51 CN=2 

GOSUB 310 

UI$=UI$+" ("+SR$+"A) " 

GOSUB 35790 

IF PX=1 THEN GOSUB 560 à 
RETURN 

REM 

REM subroutine wacht op toets 


REM 
PRINT 
PRINT"toets voor verder 22 "5 


GOSUB 210 

GOSUB 100 

PRINT"bezig..." 

RETURN 

REM 

REM subroutine uitvoer regel 
REM eventueel ook ae printer 
REM 


PRINT UI$+" ee 

IF PX=0 THEN RETURN 
SR$=UI$ on 
GOSUB 350: REM naar printer 


GOSUB 360: REM met nieuwe regel 
RETURN 

REM 

REM subroutine 

REM bijwerken hitlijst 

REM 

FOR H9=TN TO 1 STEP=1 

REM 

REM hogere plaats verdiend? 
REM 

IF NGCI)>TP(H9) THEN 4010 
REM 

REM nee, klaar 

REM & de 

HI=0: GOTO 4090 

REM 

REM opschuiven 

REM 

IF H9=TN THEN 4040 

TP CH9+1) =TP (HP) 
TR(HI+1) =TR (HS) 

TP (HS) =NG CI) 

TRH) =I 

REM 

REM volgende hitlijstplaats 
REM 

NEXT H9 

REM 

REM zoek en tel minst 

REM voorkomende naam/namen 
REM 

IF NG(I)=O THEN 4180 

IF NG(I)>MI THEN 4180 

IF NG(IJ=MI THEN MN=MN+1 

IF NG(IJXMI THEN MN=1:MI=NG(I) 
RETURN 

REM 

REM gegevens 

REM waarschijnlijkheden 


0.317,.364,.209,.08 
0.023, . 005, . OOL 


DATA 
DATA 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 


gemaakt naar het idee 
van het programma 
NEOTREE uit 
Scientific American 
mei 1986, blz. 12-15 


Basicade-2 
Pim van Tend 


Veldheimwg 8 
6871 CD RENKUM 


) REM 


REM 
REM 
REM 


copyright (c) 1986 
Stichting Mens en 
Wetenschap, Huizen NH 























__Om het initiatief voor het samenstellen en 
___uitgeven van het mikroskopieboek te on- 
__dersteunen kreeg de stichting Mens en 
__Wetenschap onlangs de mogelijkheid om 
_ ____ iedere intekenaar een 


Hans Schouten 










ter waarde van 45,-- 
ter beschikking te stellen. Deze onmisba- 
re set wordt u na betaling van het inteken- 
bedrag toegezonden. 


MIKROSKOPIE 










(Zij die reeds intekenden ontvangen de set 
__spoedig thuis). 







__Eindelijk zal een wens van velen in ver- 
____vulling gaan. Sinds in 1973 de eerste 
__artikelen over mikroskopie in ”Aar- 
__de&Kosmos” verschenen, werd de 
_roep om een echt en volledig boek over 
__de mikroskopie steeds luider. 

_ Een dergelijk boek is echter bijzonder 

duur en geen enkele kommerciële uit- 
gever waagt zich er aan. 
De stichting Mens en Wetenschap stelt 
wel tegen kostprijs de brochures ”Mi- 
kroskopie”’ beschikbaar, maar al met al 
is ook dat niet goedkoop en blijven het 
slechts fotokopieën. 
















Voorjaar 1987 is er dus groot feest, want 
dan verschijnt 






Voor op school en thuis 


200 pagina’s boordevol informatie van- 
af het prilste en eenvoudigste begin tot 
en met het meest haalbare en prakti- 
sche voor school en thuis. 


Groot formaat (cirka 29 x 22 centime- MAAR: we hebben een intekenmoge- 


ter), zwaar en degelijk papier, naast 
zwartwit ook erg veel kleur, waaronder 
zeer unieke foto's die niet alleen likke- 
_baardend bekeken kunnen worden, 
nee: men kan ze met eenvoudige appa- 
ratuur ook zelf maken! Dat wordt alle- 
„maal heel duidelijk en uitvoerig be- 
schreven. 













Als we moeten vertellen wat er allemaal 

Ín “Mikroskopie voor op school en 

thuis” te vinden is, dan kunnen we datin 

twee woorden af: 

s VRIJWEL ALLES wat voor de mikrosko- 
pie op school en thuis van belang kan 

zijn. 


Wat gaat dit unieke boek kosten? 


Normaal gesproken zijn dit soort boe- 
ken voor velen onbetaalbaar. De stich- 
ting Mens en Wetenschap is echter de 
uitgeefster van dit prachtige boek en 
dus is de prijs laag, in overeenstemming 
met de doelstelling zoals u die vooraan 
in dit blad kunt vinden. 

De normale verkoopsprijs zal bij ver- 
schijnen zijn f 79,-. 


D (U ontvangt een bevestiging.) 


lijkheid opengesteld, waardoor u een 
belangrijk prijsvoordeel hebt terwijl de 
stichting Mens en Wetenschap belang- 
rijk minder kosten heeft. 

Bij intekening met vooruitbetaling is uw 
prijs dan slechts 59,-, waarbij de 7 gqul- 
den verzendkosten voor onze rekening 
zijn! Dus een 













De eerste oplage is beperkt. Wilt u zeker 
zijn dat u het boek ontvangt, teken dan 
spoedig in door overmaking van f 59,- 
op giro 4998215 t.n.v. Mens en Weten- 
schap te Huizen onder vermelding van 
“Mikroskopie voor op school en thuis”. 





Dr. W. van Tend 


Tsjernobyl 
als 


computer- 
ganzenbord 


Het eerste computerprogramma kregen 
we van de vakgroep “Wiskunde” van 
de Landbouwuniversiteit Wageningen. 
Het tekent de stroomlijnen die ontstaan 
wanneer een bron iets loost in de wind. 
De ’bron’ kan een gewone schoorsteen 
zijn, of een brand in een kerncentrale. Er 
kunnen gewone rookgassen geloosd 
worden, die dan op grote afstand aan- 
leiding geven tot zure regen, of er kun- 
nen radio-actieve gassen ontsnappen 
of stofdeeltjes, waarin radio-actieve 
elementen vastzitten. De gassen volgen 
precies de stroomlijnen. ret stof kan 
een stuk met de wind meewaaien, maar 
zal uiteindelijk neerdwarrelen. Bij kleine 
stofdeeltjes gaat dat neerdwarrelen 
echter uiterst langzaam; we hoeven 
daar niet echt rekening mee te houden. 
Het zijn regenbuien, die het stof uitein- 
delijk laten neerslaan. 








Verspreiding uit bron 


In de computertekening van afbeelding 
1 zien we twee soorten stroomlijnen. De 
lijnen van de eerste soort komen aan de 
linkerkant de tekening binnen en wor- 
den dan door de bron opzij gedrukt. De 
lijnen van de tweede soort ontspringen 
aan de bron. Langs deze lijnen stroomt 
de verontreiniging weg. De bron drukt 
sommige lijnen over een bepaalde af- 
stand tegen de wind in, waarna ze ver- 
der met de windrichting meelopen. Er is 
Eén speciale (stippel)lijn. Deze scheidt 
de twee soorten stroomlijnen. De grens 
wordt separatrix of separatrice ge- 
noemd. De plaats waar de separatrix de 
onderkant van de tekening bereikt, heet 
het stagnatiepunt. Hier stagneert de 
stroming: links van het stagnatiepunt 
gaat de stroming naar rechts, rechts er- 
van naar links. 

De stroomlijnentekening kunnen we op 
twee manieren opvatten, namelijk als 
bovenaanzicht en als zijaanzicht. Als we 
kiezen voor het bovenaanzicht, dan ont- 
breekt in feite de helft. De tweede helft 
van de kaart krijgen we door de teke- 
ning te spiegelen om de onderrand. Bij 
een interpretatie als zijaanzicht is de te- 
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MILIEU 


”De één z'n dood is de ander z’n brood.” De ramp met de 
kerncentrale van Tsjernobyl was een buitenkansje voor de 
onderzoekers die zich bezighouden met luchtstromingen. In heel 
Europa zijn metingen gedaan van de aankomst van radio-activiteit 
tijdens de laatste dagen van april en de eerste dagen van mei 
1986. Men legt deze metingen naast computerberekeningen die 
aangeven, hoe de wind verontreinigingen verspreidt. In dit artikel 
bekijken we een paar eenvoudige computerprogramma’s die de 
principes van de verspreiding kunnen laten zien. 


kening wel compleet en is de onderrand 
het aardoppervlak. 

Wanneer we dieper gaan nadenken 
over de tweee interpretaties, komt een 
probleem tevoorschijn met de vertaling 
naar de werkelijkheid. Neem eerst het 
bovenaanzicht. De tekening is geen 
weergave van de situatie op één be- 
paalde hoogte, maar geeft de stroming 
op alle hoogten. Dat wil zeggen dat op 
elke hoogte een bron aanwezig is. De 
bron is dus een verticale lijn. We kunnen 
denken aan een hoge schoorsteen, die 
poreus is en over zijn hele lengte in alle 
richtingen verontreiniging uitstoot. Ook 
de interpretatie als zijaanzicht leidt tot 
een vreemde situatie. Stel onze teke- 
ning is een verticaal vlak dat in de 
noord-zuid-richting staat. We kijken 
vanuit het oosten en de wind komt uit 
het zuiden. In dit geval vertegenwoor- 
digt onze tekening alle noord-zuid-vlak- 
ken. De bron is een poreuze buis, die in 
de oost-west richting loopt. 


Afbeelding 1. De stroomlijnen die ontstaan 
wanneer verontreiniging in de wind wordt ge- 
loosd. 





Stroomlijnen 


Een echte schoorsteen staat verticaal 
en is niet poreus. De top van de schoor- 


steen is in feite een puntbron van ver- 


ontreinigingen. Hetzelfde geldt voor een 
brand. Een puntbron in de wind geeft in 
het echt een tongvormige pluim, die de 
wind zowel naar opzij als omhoog laat 
uitwijken. De exacte weergave van die 
situatie is veel ingewikkelder. Men doet 
het daarom in dit geval en in vele andere 


gevallen met een vereenvoudigde, vlak- 


ke voorstelling. 


_ Het computerprogramma voor de 





stroomlijnen vraagt geen enkele invoer. 
Dat lijkt vreemd want er zijn dingen die 
kunnen variëren. De wind kan sterk of 
zwak zijn. De bron kan zijn verontreini- 
ging met grote kracht uitstoten of maar 
zachtjes. In feite gaat het daarbij niet om 
twee getallen, maar om één; namelijk de 
verhouding van bronsterkte tot wind- 
sterkte. Waar het om draait, is dat de 
vorm van de tekening voor elke optre- 
dende verhouding hetzelfde is. De eni- 
ge variatie zit in de schaal ten opzichte 
van de werkelijkheid. De afstand van 
bron tot stagnatiepunt kan in de 
werkelijkheid enkele decimeters zijn of 
tientallen meters. Hoe die schaal is, 
hoeven we het programma niet te ver- 
tellen. Het tekent het stroomlijnenpa- 
troon zo, dat het goed op het scherm 
past. De vertaling naar de werkelijkheid 

wordt aan onszelf overgelaten. | 


Eenvoudige pluim 


Voor het geval Tsjernobyl gaan we die 
vertaling maar eens uitvoeren. We stel- 


len de afstand bron-stagnatiepunt op 


één eenheid en kiezen de interpretatie 
als bovenaanzicht. Als de verhoudingen 
op ons beeldscherm kloppen, kunnen 
we de pluimbreedte ter hoogte van de 
bron opmeten. In ieder geval is die 
breedte af te leiden uit de formules 
waarmee de separatrix getekend wordt. 
De pluimbreedte bij de bron blijkt uit te 
komen op zt eenheden (de halve breed- 
te is 7:2, ongeveer 1,5). Verder met de 
wind mee wordt de pluim breder. Meet 
maar eens de breedte aan de rech- 
terrand van de tekening. De formules 
laten zien dat de pluim aangroeit tot een 
maximale breedte van 27, ongeveer zes 
eenheden (drie eenheden halve breed- 
te). Dit kunnen we eens vergelijken met 
de breedte van de zone die door de 
brand in Tsjernobyl is verontreinigd. 

Op arote afstand, in Scandinavië, is die 
breedte enige honderden kilometers. 
Laten we eens bescheiden zeggen 300 
kilometers. Dat is dan zes eenheden. 
Eén eenheid komt uit op 50 kilometer. 


Dat moet dan de afstand zijn tussen 


bron en stagnatiepunt. 








Het is moeilijk een voorstelling te maken 
van een brandende kerncentrale. Een 
dergelijke brand zal hoe dan ook inder- 
daad leiden tot uitstroming tegen de 
wind in. Maar zou die stroming de wind 
kunnen wegdrukken over een afstand 
van 50 kilometer? Over een paar kilome 
ter desnoods, maar over 50? Dat is te 
gek. lets moet hier helemaal verkeerd 
zijn. 

We hebben al iets genoemd dat niet 
goed zit: de kwestie van de puntbron 
die wordt voorgesteld als een lange po- 
reuze buis. Dat kan de oorzaak zijn. Ver- 
eenvoudiging tot een vlak getal kan er 
inderdaad toe leiden dat zes eenheden 
niet de goede pluimbreedte is op grote 
afstand. Er is hier echter iets veel ingrij- 
penders aan de hand. Er is een proces 
buiten beschouwing gebleven, dat ver- 
ontreinigingen over de separatrix heen 
kan zetten. De breedte van de echte 
pluim wordt daardoor vele malen groter 
dan zes eenheden. 


Wervels in de lucht 


Alle stroming in de stroomlijnenteke- 
ning is volkomen glad. Op de echte Aar- 
de staan gebouwen, bomen, heuvels en 
bergen. Zelfs een grassprietje kan in fei- 
te de stroming al laten struikelen. Zo 
ontstaan wervels, die deeltjes kunnen 
overzetten van de ene op de andere 
stroomlijn. Een wervel leeft maar korte 
tijd. Dan ontstaat weer een nieuwe, die 
een deeltje kan terugbrengen of nog 
verder kan wegzetten. Het proces met 
de wervels heet diffusie. Dit spelen we 
na in het tweede programma (zie afbeel- 
ding 2). We volgen ongeveer twintig 
deeltjes (afhankelijk van de grootte van 
het beeldscherm). Die deeltjes bewe- 
gen zich met de wind mee naar rechts. 
We geven de wervels steeds een le- 
vensduur die overeenkomt met een 
windverplaatsing over één beeldpunt 
naar rechts. De wervels verschuiven de 
deeltjes iedere keer over een willekeuri- 
ge afstand opzij. De verplaatsing is voor 
ieder deeltje verschillend en kan gaan 
naar het midden van de pluim (de on- 
derkant van het scherm) of juist weg van 
het midden van de pluim. 

We zien dat de toevallige wervels de 
pluim verbreden. Op het eind tekent het 
programma een theoretische kromme 
voor de pluimverbreding. Uit de vastge- 
stelde verbreding kan men een getal af- 
leiden, dat de levensduur en de grootte 
van de wervels kenmerkt. In tegenstel- 
ling tot ons eerste programma is er hier 
geen buitengrens voor de verbreding op 
grote afstand. Wat hier gebeurt, is te 
vergelijken met een ganzenbordspel. 
De twintig deeltjes komen overeen met 
twintig spelers. De verplaatsing naar 
rechts correspondeert met de op- 
_eenvolging van rondes waarbij iedereen 
aan de beurt komt. De posities in de 
andere richting vertegenwoordigen de 
plaatsen op: het bord, waar de spelers 
bij iedere ronde staan. Bij iedere ronde 


(naar rechts) verschuift iedere speler 
naar een ander vakje op het bord - om- 
hoog of omlaag naar gelang de uit- 
komst van een dobbelsteenworp, die in 
het computerprogramma wordt verte- 
genwoordigd door een toevalsgetal. Als 
we maar lang genoeg doorspelen, zal 
altijd een speler het einde van de vak- 
jesreeks bereiken, onverschillig hoe 
lang die reeks is. De pluim kan zich zon- 
der grens verbreden. 


Afbeelding 2. Wervels verspreiden de ver- 
ontreiniging over een brede pluim. Dit proces 
heet diffusie. 





Regenbuien 


In de diffusie-tekening (afbeelding 2 en 
3) vallen gaten op, die onverontreinigd 
blijven. Die gaten zijn er zelfs middenin 
de pluim. Wanneer we met meer deelt- 
jes zouden spelen, zouden die gaten 
opgevuld raken. Het zou kunnen lijken 
dat diffusie met zo weinig deeltjes geen 
zinvolle nabootsing van de werkelijk- 
heid is. Dat valt toch wel mee. We kun- 
nen de twintig deeltjes opvatten als ver- 
tegenwoordigers van twintig regen- 
buien. Een aantal van twintig voor die 
regenbuien, die een spoor over Europa 
trekken, is ook laag, maar niet echt te 
laag. In de werkelijkheid vertrekken de 
twintig buien niet tegelijk uit de bron. En 
ook storten ze niet na iedere werveltijd 
een hoeveelheid regen uit. Toch geeft 
deze nabootsing best een aardig beeld. 
Terwijl de gaten in de pluim het meest 
opvallen, zijn er evenzeer concentraties 
van buien. Op die plaatsen valt een ex- 
tra hoge radio-activiteit te verwachten. 
Op 4 mei 1986 ontdekten milieu-activis- 
ten een sterk verhoogde straling bij de 
kernreactor in het Westduitse Hamm. 


" Zij schreven die straling toe aan een lek. 


Berekeningen hebben laten zien dat dat 
helemaal niet de oorzaak geweest hoeft 
te zijn. De verhoogde straling kan heel 
goed ontstaan zijn door een toevallige 
concentratie van radio-activiteit uit 


_ Tsjernobyl. 


Radio-actief verval 


Het geval Hamm trad een week na het 
begin van de ramp van Tsjernobyl op. 
Op dat moment bereikte de verzwakte 
uitstoot van de centrale Midden-Europa 
rechtstreeks vanuit het oosten. In het 
begin van de rampperiode was dat an- 
ders geweest. Er waaiden toen zuidelijk 


_ winden, die de radio-activiteit naar Po- 


Afbeelding 3. De ene keer voldoet de diffusie- 
verbreding beter aan de theoretische verwach- 
tingen dan de andere keer. Daar is het een 
toevalsproces voor. 





len, Zweden en Finland brachten. Voor- 
op liepen radio-actieve edelgassen, die 
geen enkele binding met iets aangaan. 
Men denkt dat de eerste meting buiten 
de Sovjet-Unie, die wees op het onge- 
luk, werd gedaan door een Finse sol- 
daat op zondag 27 april (het ongeluk 
was begonnen op vrijdag 25 april, 23 
uur Nederlandse zomertijd, zie ook A&K 
59/1986, pag. 472). Achter de edelgas- 
sen volgden de tragere elementen. 
Toen de radio-actieve wolk in Scandi- 
naviëe was aangekomen, draaide de 
wind daar op 29/30 april naar het noord- 
oosten. De stroming stond achtereen- 
volgens in de richting van Duitsland, de 
Benelux en Engeland. Tijdens de reac- 
torbrand was de weerssituatie onge- 
woon rustig. Dat had ook gevolgen voor 
de verticale verspreiding van de wolk. 
De atmosfeer is eigenlijk maar heel dun. 
De hoogte van het deel waarin ons weer 
zich afspeelt, is gemiddeld ongeveer 
zeven kilometer, terwijl het horizontale 
transport over duizenden kilometers 
gaat. Lucht kan onder bijzonder onsta- 
biele omstandigheden van het aard- 
oppervlak tot meer dan tien kilometer 
hoogte stijgen. Wanneer de luchtdruk 
hoog is, wordt het opstijgen van lucht 
sterk beperkt. Op een bepaalde hoogte 
begint dan de zogenaamde inversie- 
laag, waar warme lucht verdere stijging 
van lucht afkomstig van dichtbij het 
aardoppervlak voorkomt. In Tsjernobyl 
lag de inversielaag op 3000 meter. De 
gebruikelijke hoogte is 1000 meter. De 
grote hoogte zorgde voor een grotere 
verdunning van de radio-actief ver- 
ontreinigde lucht voor de naaste omge- 
ving, mmar ook voor een wijdere ver- 
spreiding. (zie afbeelding 4). 

Wanneer het over Tsjernobyl-simulaties 
gaat, mag niet buiten beschouwing blij- 
ven dat radio-actieve stoffen vervallen. 
Het verminderen van de activiteit kan 
worden ingebouwd in bijvoorbeeld het 
diffusieprogramma, maar dat doen we 
niet. Voor radio-actief verval op zichzelf 
bestaat al een computerprogramma, 
geschreven door E. Ivens (zie de afbeel- 
dingen 5 en 6). Het begint met een 
scherm vol sterretjes, die op een realis- 
tische manier vervallen tot puntjes. 


Hieraan kan het begrip halfwaardetijd 


worden gedemonstreerd. Het duurt 
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even lang om van 800 naar 400 ster- 
retjes te gaan als het duurt van 400 naar 
200, van 200 naar 100 of van 100 naa 

50 (zie tabel 1). 

Van de belangrijke stoffen bij een kern- 
ramp is tijdens het transport alleen het 
verval van jodium-131 relevant. De half- 
waardetijd daarvan is acht dagen. De 
andere twee gevaarlijke stoffen zijn ce- 
sium-137 en strontium-90, met half- 
_waardetijden rond de 30 jaar. Deze ko- 
men dus in vrijwel dezelfde hoeveelheid 
op de grond terecht als waarin ze ver- 
trokken zijn. Stoffen met nog langere 
alfwaardetijden zullen nog eeuwen aan 
het ongeluk van Tsjernobyl blijven her- 
inneren. Gevaarlijk zijn die stoffen alleen 
op de momenten dat toevallig een kern 
vervalt. Omdat de halfwaardetijd zo 
lang is, zijn die momenten echter uiterst 
zeldzaam. 


Afbeelding 5. Het menu van het programma 
“radio’actief verval”. 


MAKER : KE. IVENS, DOETENCHEN 


DJ OKUNI KIEZEN Uit: 

ie UITVOERING DAN DE "PROEF 
4. WIELEG VOOR DE LEERLING 

Ss. UITLEG VOOR DE LERAAR 

4. UITLEG VOOR DE PROGRAMMEUR 
5. SIOPPEN. 


WEER NOINER KIEST U P 


Stopzetten reactor 


Wat betreft snelvervallende stoffen 
hebben we nog iets goed te maken. In 
het eerste artikel over Tsjernobyl in Aar- 
de en Kosmos 5/1986 stond op bladzij- 
de 472 te lezen dat de lozingen begon- 
nen waren op donderdag 24 april. Dat 
was afgeleid uit de verhoudingen van de 
verschillende vervallen stoffen, zoals 
die in Zweden waren vastgesteld. Het 
officiële begin zijn de Russen steeds 
blijven aangeven op het eind van vrijdag 
25 april (onze tijd). Wat is hier de waar- 
heid? We kregen het antwoord weer 
van Kees Andriesse van de KEMA, die 
ook in het eerste artikel aan het woord 
kwam. De Russen hebben steeds zeer 
openlijk de waarheid verteld. Alle twij- 
fels 

die ik in het begin daarover had, waren 
ongegrond. Het tijdstip dat wij hadden 
afgeleid, was een overinterpretatie van 
de gegevens. Donderdag de 24ste is 
het tijdstip dat de reactor vanaf vol ver- 
mogen is teruggeschakeld. Vanaf dat 
moment heb je verval gehad, maar nog 
niet meteen een lek. Het vrijkomen be- 
gon op het einde van de vrijdag tijdens 
experimenten, waarbij de reactor vrijwel 
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uitstond. In die situatie is het moment 
van vrijkomen niet af te lezen aan de 
verhoudingen van de verschillende 
stoffen. Die verwijzen naar het eerdere 
tijdstip van afschakelen, maar wij wisten 


KKK KKK KKK KKK AKK KKKKKKKKKKK „K.K KKK 
KAKKK MK AKK, AKKKKKKKKKK KK, KKK, AKK KK KKK 
K, KHK KKK KKK KKK KKKK KKK KKK „HK, KKKKKK 
KAKKKKKKKK  , AKKKKKKK KKK KKKKKKKKKK KA KKK 
KK. AKK, AKK, KKK KKKKKK , KKKKKK KAK KKKK KKK 
KAAK KKK KKK KKK, KAKKKK K.K 
KKKKKKK HAK KKKKKKK , KKKK AKK, KKK KAAK XK 
KORAKKKKKKKK  ARKKKKKKAKK , KAKKKKK , KAKKKKKKK, 
KRAAKKKAKK ARK, KAKKKKKKKKK KKK. HK. 
KAAK KAAK KKK KK KK KRK „AKK KK, KKK K 
KHK KKKKKK KKK KK, KK, KKK KKK KKK 
KRK KKK KKK KKK KAAK KKK AKK KK KKK KKK 
KAAK AK, AKKKKK KKK HAAK KKK KKK AK XK 
KAAK KAAK AK KRKKKKKK AK AAKKKKKKKKKKK 
KKK KKKK AKK AKK KKOK 
KKK, KKKKK K.K KKKKK OK  NKKKKK KKK... * 
KAAK AK KKK KKK KKK KKK KKK HK, KAAOKK „ K 
KAAKKKKK KKK AK, KAKKKKKK KKK KKKKKK AK 
HAHAHA AKK KKK AK KK, AKK KKK KKK KKK 
KK KKKKK AAA KKKK  AAKKKK KK, KK 
KAAK AKK AKKKKKK KKK KKKKKKK 
KOK AAA AKK KOKK  AKKKKKKKKKK, 
KAAK AAR AKK AKK KK KAK AK 
133 AFBREKEN MET ’RETURN” 


van Esens Kun Been EEn der en te Kk. 
EEn RE ij ea DE Kran Kanan seks KIRK .K. 
Rn KB ner nn RR ne 
RE an one IRT POE NR ae ren XX 
ER LE EE KEE wee a Min sas 
Kn harren kik X..xX.X 
BE Re be bren en ek Er Bren en XX. X x 
x BEES a nn a vent Ka Marr in Bit 
Caen Kee Bat nn Raas ade ke Rn ER EN 
Nii rn en Vi Be hann ee REE ers Res 
BABE rien nn Ks a KBE eva wide Ee ae 0 
nennen Kar ie K.K... X x XxX 
TE KD ae ne Ren emee neste kak 
EE DE A TELEN Bate an EN Kwak kk. …& 
wetn a eind Ks oare ee aides eee Re Be Kirs 
REVERE Khin ke REET ene 
nn Bi at rn es PRE BER END we XX 
IEEE dk Kinds Beda Kn zie lin More Eet Mr 
kt ie EEEN TLD ENE en EE 
EEEN Kn EREN oa ie en a 
vase Kee en an Bars KE ek Tk 
MEREN ds ee EN KR 0 EEEN an ez Ie 
Geek REKE ERN CEE re Jee f 


156 AFBREKEN MET ’RETURN? 


2e KEER 
tijdstip tijds 


ie keer 
tijdstip tijds 


| 
ll 
le) 


30:36 gn 


gewoon niet dat er twee verschillende 
tijdstippen in het spel waren…” 


Afbeelding 6. Het programma “radio-actief 
verval” laat sterretjes vervallen tot puntjes. Dat 
gaat met een vaste halfwaardetijd, net als in de 
werkelijkheid. 


LEKER REKE, BO khan Re 
KKK IN NEN, KR En KK. 
KERK Ni LAAK, Aak ke En 
Ke Ke Ke KRK AN AAE ERE 
KK kRAS eN 
KKK. Kr KR BREE RE 
KAK RKEK KK ERR 
Kims B KRAKERS KN KE AETR 
KIKKKN, KH A Wan 
NEREDE S HK AE KA AR KKELKK! 
KKK KA 
REE Kk 
ME KE en sn den HAR NRK 
NEEN REE Se 


Ks KKK. Ke EK Mk a 


KKK. KKK. KKK, KKKK, KK, K.K... 

XK... KKK HK... KKK. KK. KK. KKK. KK. 

se RR NR KRK Kr Een ek KARKKK. KKK. 
412 AFBREKEN MET ’RETURN” 


43 AFBREKEN MET ’RETURN? 


3e KEER 
tijdstip tijds 


gemiddelde halfwaardetijd uit alle metingen 88 sec 





Bezitters van MSZ-1 computers kunnen het 
programma “radio-actief verval” voorzien van 
het geluid van een Geigerteller. Ze moeten dan 
deze twee regels toevoegen. 


Tabel 1. Deze metingen van de halfwaardetijd 
hebben we uitgevoerd met het programma “ra- 
dio-actief verval”. De waardes ir seconden 
hangen af van de snelheid van de gebruikte 
computer. 


1252 IF ACHO;,VEJ=N THEN OUT &HAB,&HE:OUT &HAB, &HE 
1254 IF ACHO,VEJ=E THEN OUT &HAB,&HF :OUT &HAB, &HE 


4 


rme orviipenaemwens ennen appr ngnraamden 


as 


zwam rvan 


Wet deposition 


| 
| 

| 

| ME | 
mn À ee Air concentrations (Bq/m ) 
| 

: 300 Ba /m? 
| 


: | 3 x10“ Ba! m? 





EN 


| Afbeelding 4. Zo verspreidde zich de radio- 
activiteit uit Tsjernobyl. . 


| | | Voor listing zie bladzijde 203 
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Een ander computerganzenbord 


Ganzenborden is meer dan alleen maar 
gooien met dobbelstenen. Er zijn regels 
om sprongen vooruit te maken, om 
beurten af te wachten en om achteruit 
gezet te worden. Zo zijn ook bij het 
diffusie-programma extra regels inge- 
bouwd. De kans om bij een beurt terug 
te gaan (in de richting van het midden) 
van de pluim) is even groot als de kans 
verder weg te komen. Bij het bereiken 
van de as van de pluim (het beginvakje) 
kaatsen we terug. Dat gebeurt omdat 
we maar één helft van het feitelijke ge- 
beuren tekenen. In de werkelijkheid is 
er een uitwisseling van deeltjes tussen 
de twee helften. De problemen daar- 
mee verbonden lossen we op via de 


terugkaatsingsregels. 

In dit nummer is een ander programma 
te vinden, dat ook als ganzenbordspel 
is op te vatten. Het gaat om het pro- 
gramma ”stambos”’, dat de opkomst 
en ondergang van familienamen na- 
bootst. De spelers zijn hierbij de fami- 
lienamen. De vakjes zijn de aantallen 
malen dat een naam kan voorkomen. 
De rondes van beurten zijn de op- 
eenvolgende generaties. Bij het stam- 
bos zijn de regels behoorlijk verschil- 
lend. Wanneer een naam tot nul 
gezinnen terugvalt, is er geen terug- 
kaatsing. Die speler verdwijnt voor- 
goed uit het spel. 

Er is kans op het achteruitgaan van een 


Tsjernobyl. 


naam en op vooruitgang. Wanneer een 
naam een zeker minirnumaantal gezin- 
nen heeft, wordt de kans op teruggang 
tot nul wel erg klein. Namen die talrijk 
zijn, hebben een iets betere kans ook 
talrijk te blijven (op een ver vakje te 
blijven). 

Ganzenbord, diffusie en het stambos: 
het zijn in de werkelijkheid heel ver- 
schillende dingen. Toch hebben we ze 
teruggebracht tot hetzelfde spel met 
iets verschillende regels. Dat ging door 
de dingen te vertalen tot wiskunde en 
die wiskunde onder te brengen in een 
computerprogramma. Het zal niet de 
laatste keer zijn dat we op een dergelij- 
ke manier verbindingen kunnen leggen. 


1079 
1089 
1990 
1190 
1119 
1129 
1139 
1149 
1150 
1160 
1170 
L189 
1190 
12008 
1210 
1229 
1230 
1240 
1250 
1260 
1270 
1280 
1230 
1300 
1310 
1320 
1330 
1340 
1350 
1369 
1370 
13809 
1390 
1490 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1508 
1510 
1520 
1530 
1540 
1550 











REM 

HT=22:BR=33 
OIMPNSCBR, HT) 

FORI=1 TOBR 

FOR J=1 TOHT 

PNBGT dS" 

NEXT J 

NEXT I 

REM 

REM beginpunt figuur 
REM 
XB=l :YB=11 
REM 
REM werkpunt 
REM 
MEN Ye B 

REM 

REM eventueel schaalverschil 
REM 
YY=Ì 
REM 
REM lengte zijde en eindpunt 
REM 
ZYSSRIKE=KB ZY 

REM 

REM scherm schoon 

REM 

GOSUB1 009 
HO=3:VE=23:GOSUB1 10 
PRINT"veel geduld aub’; 
REM 

REM richting 

REM 

Xl=l:Y1=0 

Kleden aan 

REM 

REM beginf iguur 

REM 

GOSUB2380 

REM 

REM op het scherm 

REM 

GOSUB2580 

REM 

REM 4 maal zo'kort 

REM 

LZY=4Y/4 

REM 

REM richtingen 

















1560 REM  G=naar links, 1=omhoog, enz. 
15/79 REM 

158% FORI=1 TONH 

1590 READHSC( IJ 

1699 NEXT I 

1619 REM 

1620 REM werkpunt = Beginpunt 
1639 REM 

16409 X=XB:Y=YB 

1658 REM 

168% REM kortere lijnstukjes 
1670 REM 
1688 FORI=1 TONH > 
1690 REM 

1709 REM volgende richting 

1718 REM 

1728 RISHSCIJ 

1230 REN 

1740 REM * nieuwe stappen 

1258 REM 

1260 IFRI=@ THENXI=1:Y1=0 - 
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1770 


IFRI=1 THENX1=0:YI=-YY 
IFRI=2 THENXI=-1:Y1=0 


2460 
2470 
2489 
24390 
25008 
2510 
2520 
2530 
2540 
2550 
2560 
2570 
2580 
2590 
2600 
2618 
2620 


2630. 


2640 
2659 
2660 
2670 
2688 
2690 
2700 
2710 
2720 
2738 
2740 








| 
ba 
aa Bn 
i | Ben 
B 
RO 
- 


REM 

IFCABS(P-X)=2Y)} ORCABSCQ-YI=ZY) THEN2539 
REM 

REM teken verder 

REM 

P=P+X1 :Q=Q+Y1 

GOTO2429 

RETURN 

REM 
REM subroutine afdrukken 





REM cursor linksbovenaan 
REM 
0=0:VE=0:GOSUB1I 18 
EM 
EM regel voor regel 
EM 

ORA= 1 TOE, 


M 


NAAN IL 





REM nieuwe regel 
REM 
PRINT 
REM 
REM tekens pal op elkaar 
REM 
FORB=1 TOBR 
PRINTPN$(B, A); 
NEXTB 

NEXTA 

RETURN 








25089 DATAG,1,0,3,3,0,1,8 


1299 IFRI=3 THENX1=8:YI=YY 

1809 REM 

1819 REM wissen. 

1820 REM 

1839 IFI=1 THENZY=ZYX4:KI =0 

1849 GOSUB2380:2Y=2Y/4 KLEI 

1850 REM tekenen 

1860 REM 

1879 GOSUB2389 : GOSUB2580 

1880 REM 

1899 REM nieuwe werkpunt 

1900 REM 

19109 XEX+XIXZY 

1929 Y=Y+YIKZY 

1330 REM 

1949 REM volgende lijnstukje 
1950 REM 

1960 NEXT I 

1970 REM 

1989 REM eindpunt? 

19390 REM 

20009 IFCX=XE) ANDCY=YB) THEN2260 
2018 REM 

2020 REM rechtuit? 

2030 REM 

2042 IFPN$SCX+SGNCXI1), Y+SGNCYIJJ="$" THEN1680 
2050 REM 

2060 REM linksom dan linksom draaien 
2070 REM 

20829 IFPNSCX+SGNCY1), Y-SENCKIJJ="$" THEND=1 :GOTO21 
u) 

2090 REM 

2128 REM rechtsom 

2118 D=3 

2120 REM 

2139 REM draai 

2140 REM 

2159 FORI=1 TONH 

2168 HSCIJ=CHSCIJ+D) 

21709 IFHSCIJ>=4 THENHSCIJ=HSCIJ-4 
2180 NEXT I 

2130 REM 

2208 REM volgende lijnstuk vervangen 
2219 REM 

2220 GOTO16809 

2230 REM 

2249 REM klaar voor nieuwe zijde 
2250 REM 

2264 ZY=ZY/4 

2270 REM 

22808 REM nog lang genoeg? 

22390 REM 

2300 IFZY>1 THENRESTORE :GOTO15S80 
2310 REM 

2320 REM klaar 

2330 REM 

2340 END 

2350 REM subroutine voor lijnstuk 
2360 REM 

2370 REM 

23808 P=X:Q=Y 

2398 REM 

2402 REM tekenen of wissen? 

2410 REM 

2420 IFKL=1 THENPNSCP,Q)="$" 

2430 IFKL=G THENPN$S(P,Q)=" * 

2440 REM 

2450 


REM einde lijnstuk? 


Ee in | en 
Tsjernobyl | 1998 A=408:GOTO2O:REM diffusie N an an 
computerprogramma’s iB28 PRINT Die erde eem Eer 


1838 PRINT"luchtverontreiniging zich” b ‘ rr nt 

1948 PRINT"verspreidt over grote afstand." d onnemen 
bron in wind 1958 PRINT - DAAA TIA A 

1868 PRINT"In de linkeronderhoek van het" op hd | | An R. 
1908 A=198:GOTO2O:REM bron in wind * Ee 
























































ï 1078 PRINT"“scherm is een ongeluk gebeurd" 
1819 P1=3,141592653589 1988 PRINT "met een kerncentrale. De wind” 
1928 PRINT 1898 PRINT "komt van links." 
p 1934 PRINT“Dit programma maakt een” 1122 PRINT 
1048 PRINT tekening wan de stroming" 1118 PRINT"leder stipje kan een plaats op" 
1859 PRINT"die ontstaat, wanneer een” 1120 PRINT"de kaart zijn, waar een” 
1960 PRINT bron (bijvoorbeeld een” 1138 PRINT "radio-actieve regenbui neerkomt. Í 
1878 PRINT"schoorsteen) iets loost in" en PRINT : Slechts 39,50 per jaar 
I980 PRINT "de wind. Deze voorstelling" 1159 PRINT "toets voor ramp>"5 
1830 PRINT "geldt alleen dichtbij de bron.” 1169 GOSUB21B:REM wächt op toets E 
1108 PRINT 1128 REM 1RI_K 
110 PRINT"We krijgen de helft van een” 1188 REM aantal steekproefdeeltjes Bel 02152 …8388 
1120 PRINT "bovenaanzicht te zien." 1198 REM (aantal buien) 
1138 PRINT"De bron bevindt zich midden” 1298 REM afhankelijk van 
1148 PRINT “onderaan het scherm. De" 1218 REM schermhoogte 
1158 PRINT "wind komt van links. De andere" 1229 REM 
1168 PRINT" "helft van de stroming ontstaat” 1232 NY=UG/20 
1178 PRINT"door spiegelen om de onderrand" 1248 REM 
1189 PRINT"van het scherm. De tekening" 1258 REM posities deeltjes 
1289 PRINT "kan ook worden opgevat als" 1262 REM begin op @ 
GELDER ENE Si daanzicht.” 1270 REM 
1228 PRINT 1288 DIMXCNY) “ 
1239 PRINT'"Toets voor verder>"; 1299 FORI=1 TONY 
1248 GOSUB2109 1328 X(1)=0 
1250 CN=B:REM voorgrondkleur 1312 NEXTI 
12508 GOSUB6QA:REM grafisch scherm 13209 REM 
1278 KEM 1338 REM verwachte grootste 
1280 REM teken grondlijn 13408 REM zijwaartse afwijking 
1290 REN 1358 REM 
1308 HO=D:VE=1-1/UG :GOSUB620 1360 F1i=2 
1318 HO=1-1/HG : GOSUB630 1378 MX=F1XSQRC1/3)XSORCHG) 
1320 REM 1388 REM 
1338 REM schaalfactor 1398 REM graf isch scherm 
1340 REM 1408 REM voorgrondkleur 
1359 SF =50 1418 REM 
1368 REM 14209 GOSUB600 :CN=9 
13/8 REM teken 8 stroomlijnen 1438 REM 
4 1388 REM 1440 REM wolk verschuift van 
1598 FORI=i TO8 1458 REM links naar rechts 
1489 READC 1462 REM 
1410 LO=0 1428 FORHO=8 TO1-1/HG STEP1/HG 
1428 GOSUB1610 1482 REM 
3 1430 NEXTI 1498 REM laat ieder deeltje 
1440 REM 1529 REM deelnemen aan een 
1458 REM teken separatrix 1510 REM wervel 
1460 REM 1520 REM 
1478 C=P1:LQ=0:GOSUB1610 15309 FORI=1 TONY 
1480 REM 1540 REM 
1438 REM wacht op toets 1553 REM haal een toevalsgetal 
1599 REM 1568 REM in RU (Q-1) 
| 1518 GOSUB210 1528 REM 
1520 REM 15808 GOSUB260 
1538 REM stop 1598 REM 
1540 REM 1608 REM nieuwe positie van 
1558 GOTOS5O 1618 REM deeltje 
1560 REM 1628 REM 
1570 REM subroutine 1638 XCIDEXCIJHCRU-. 5)X2 
1580 REM teken stroomlijn 1640 REM 
1598 REM invoert: C 1658 REM plotpositie ki n 
1698 REM 16608 REM F 
1618 FORFI=PI TOC/10 STEP-P1/135 1678 VE=1-1/UG-ABSCXCIJ/MX) ha 
1628 S=SINCFIJ 1688 REM # 
1638 R=CC-FI)/S 1698 REM buiten scherm? TENT TI erismaniukers 
1648 X=ERKCOSCFIJ 1708 REM 
1658 Y=RKS 1718 IFVE<@ THEN1790 R . 
1659 GOSUB1 730 1520 REN Uitstekende optiek 
1620 NEXTFI 1730 REM teken punt it t rn 
1688 RETURN 1748 REM 
16398 REM 1758 GOSUB620 voor een Ul ers age prijs 
1708 REM subroutine 1758 REM 
| rn punt keken ee Deze 7x50 kijker met een gezichtsveld van 
| 1239 SX=XXSF+160 1290 NEXTI 7 graden (122 meter op 1000 meter af- 
1748 SY=188-YXSFX3/4 1800 REM i i fi Hi ak 
1758 IFCSX<8) OR(SX>=320) THEN1820 1818 REM met de wind mee stand) ia uitermate geschikt geld. bij sche 
1268 IF(SY<2) ORCSY>=180) THEN1820 1820 REM mering nog duidelijk details te onder- 
eaf sn an scheiden (duisternissterkte of schemer- 
1788 VE=SY/180 1840 REM ; : 6 s 
17298 IFL@=8 THENGOSUB620:REM punt 1858 REM teken theoretische kromme getal is 18,7). Dioptrie-regeling - en + 3. 
p 1800 IFLQ=1 THENGOSUB630:REM lijntje 1860 REM wan gemiddelde verbreding Scheidend vermogen Is 6 sec. Uittredepu- 
| 1818 IFC<Ò>PI THENLOQ=I 1870 REM TE : : 
1828 RETURN 1888 FORHO=8 TO1-1/HG STEP1/HG pil is 7,1 mm en de relatieve lichtsterkte 
18308 REM 1898 VE=1-C1/UGI-C1/F1)XSQRCHO+17HG) bedraagt 66. Optiek van hoge klasse. In 
1848 REM dataregels met de 1998 IFHO=@ THENGOSUB620 : 
1850 REM kengetallen “van de 1918 IFHOXS8 THENGOSUB630 echt lederen tas, kompleet met speciale 
| 1868 REM acht stroomlijnen 1928 NEXTHO voorzetfilters (oranje). En met garantie! 
18709 REM 1930 REM È 
| 25029 DATA4.3,3.7,3.3,3 1949 REM wacht op toets Prijs 155,-. 
| 25018 DATA2.5,2,1.5,0.75 8 1958 REM 
30908 REM | 5 | 1969 GOSUB219 Voor A&K/DJO-lezers slechts 129,-. 
| 30010 REM de robpderh aided 13970 REM 
| 30028 REM van dit programma kom 1988 REM sto . 
| 30039 REM wan de vakgroep wiskunde EA BE ú „| Bestellen door overmaking van 129,-- 
| De Landhoumin jers Ken 2008 GOTOSSE (inkl.verzendkosten) op giro 4998215 tnv 
30050 REM ägen ingen. 32098 REM ' i î 
| 30060 REM dasB REM dre dn | de stichting Mens en Wetenschap te hui- 
| 30070 REM vertaald naar Basicode 3 1 32029 REM Basicode-3 programma zen-Nh. 
| 
| . 
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Speciale aanbieding voor de lezers van “Aarde&Kosmos-DJ0” 


Minerals 


Een in prachtige kleuren uitge- 
voerde wandkaart van maar liefst 86 x 
136 cm waarop 200 mineralen zijn af- 
gebeeld. Kompleet met mineralogi- 
sche, kristallografische, chemische 
en natuurkundige gegevens. 

Speciaal voor scholen, studen- 
ten, amateurs, verzamelaars, hob- 
byisten een iedereen met belangstel- 
ling voor mineralen. 

Deze unieke kaart maakt het 
mogelijk om heel snel en eenvoudig 
mineralen te herkennen met bijbeho- 








SATELLIETKAART 
van Nederland 


Sinds 1972 wordt ons land regelmatig ge- 
fotograteerd doorlLandsat-kunstmanen. 
Uit vier opnamen, gemaakt op 1 en 2 
november, is nu een groot formaat foto- 
kaart in vier kleuren samengesteld, waar- 
op Nederland en België tot de lijn die over 
Luik en Brussel loopt, te zien zijn, zonder 
dat er één wolkje boven het land hangt. 
De kaart is geproduceerd door het ITC en 
het NLR. Er is een nieuwe bewerkings- 
techniek gebruikt die kleuren heeft opge- 
leverd die dichter bij de werkelijkheid ko- 
men dan de „valse-kleuren” die we 
gewoonlijk op Landsat-opnamen zien. 


rende gegevens. Een Nederlandse 
tekstbegeleiding is bijgevoegd. 


Deze wandkaart kost nor- 
maal 30 gulden. Voor u als lezer 
van „Aarde&Kosmos/DJO” 


slechts 24,95 inklusief de ver- 
zendkosten (de kaart wordt op- 
gerold in een koker verzonden). 


ve (oeren hann 


of the world 


Extra korting bij meer exempla- 
ren: 

2 tot 5 stuks -10% 

6 tot 10 stuks -15% 

11 tot 20 stuks -20%. 
Meer dan 20 exemplaren: op 
aanvraag. 


Bestellen door overmaking van 
het verschuldigde bedrag op giro 
4998215 tnv de stichting Mens en 
Wetenschap te Huizen-Nh. 
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De kaart meet 94 x 123 cm en bezit een 
schaal van 1:275.000.Door het grote for- 
maat konden zeer veel details in de opna- 
men weergegeven worden. 

De kaart is uitgevoerd op zwaar papier, 
gevat in twee metalen rails waardoor hij 
minder kwetsbaâr en makkelijk kan wor- 


den opgehangen. 


De kaart is opgerold en verpakt in een 
stevige koker. Er zit een toelichtend boek- 
je van 16 pagina’s bij. 


De kaart kan besteld worden onder num- 
mer 80-56. De prijs is 49,50 (inklusief de 
verzendkosten). 

Bestellen door storting van het verschul- 
digde op giro 4998215 tnv de stichting 
Mens en Wetenschap te Huizen-Nh. 


